CD 


Q 

O 

O 

o 

o 

o 


o 


o 

o 

o 

o 

o 

Q 2 . 

o 1 

10 

o 9 . 

o 8 

7 * 

O 

o 5 
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SCHEDULER 


-4444-1- 


02451 
¥247F 
0 2640. 
02514 
02724 
0 2 7 34 
0 0 020 
0 0120 
0 0 €’ a 4 
T0W4 
0 3 * 3 
-0-3-372- 
03375 
0 327 3 
• Q'3’2’63 
0 0 0 01 
03211 
031C4 
Q 32 23 

. SL 13 ZL 

02710 

G 0 15 3 
02302 
01224 
01216 
01221 

-01.21-3. 

03314 
0 2511 
02466 
0 2 462 
00 040 
0 0 050 
0 2 524 

.03320 

02507 
05 000 
0 3 327 
01275 


P 

F 
P 
P. 

P 

P 


P 

F- 

P 

P 

P 

P 

"P~ 

P 

P 

P 

,D- 

I 

P 

P 

"P~ 

P 

P 

P 

P 

P 

P 


1 

2 


3 

4 

”5~ 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 
IF 
17 

-1-8— 

2 0 
21 


-U-64U6- 


IDENT 

MACRO. 

NAME 

IF 

-eR-A— 

ASE 

HLT 

EXIT 

NAME 

IF- 

EXT 
TM A 
ASE 
HLT 
END 


-EOU- 


SCHEDULR 


0 INI C 

DEBUG EQ 0, 

0 

* 


EXIT 


LEVELC 

-DEBUG.EQ.0, 

I NT POL 
3 68 

INTPDL 


EXIT- 


23 

2 4 


26 

-27- 
28 
29 
3 0 

31 

■a o 

Q c- 

.T3. 

6h 

-3-5. 


* 

* 

“IT 

* 

* 

¥ 

¥ 

"IT 


THE FOL LO W ING.SHOULD.BE.AT.LOC AT IONS 14.AJU.15 O C TAL 


OCT 
—UUP 


0000 000 0 

-I-LEN-R-I-I-E- 


THE—POttO'WlNS—SHOUE0---8E-'"AT*' LOCATTO NS.2 0 . tfr OC TA tr 

0.0000000- .. 


OCT 

“WJF 

UJP 


* 

♦ 

T" 

♦ 

Jfc_ 

♦ 

* 

* 


PARINT 


»»♦¥*»*»»»♦♦♦ »■¥■**•*¥•■*■* -»•* + ■ 


37 

'3 8"' 


■“41. 

4 i 
-4-3- 

44 

45 

»5 
47 
4 8 


SYSMAC 


-twetwi 

COSY/ 

ENTRY 

WTRT'“' 

ENTRY 

-EN7R7— 

.ENTRY 

ENTRY 

-0WT*R-Y— 

ENTRY 

ENTRY 


4 y 

5 0 
-54- 

52 
5 3 
■ 54" 
5 5 
5 6 
“ 57 ~ 
58 

5 c 

60 

61 

-62- 

63 

64 

65 . 

66 

6.7. 

68 

6 9 

7 0 

71 

72 


73 .. 

73+001 

74 

75 

75+001 

76 — 

77 


“ENTRT 

ENTRY 

-ENTRY- 

ENTRY 

ENTRY 

'ENTRY- 

ENTRY 

ENTRY 

■ENTRY' 

ENTRY 

-EMI-R-Y- 

ENTRY 

EXT 

-ENT-RY- 
ENTRY 
ENTRY 
ENTRY. 

ENTRY 

.ENTRY- 

ENTRY 

ENTRY 

ENTRY- 

ENTRY 

ENTRY 

ENTRY. 

ENTRY 

ENTRY. 

ENTRY 

ENTRY 

ENTRY 

ENTRY 


—t SYSItArC" 
03 

CMOSFT 
■'-"CTEARN" 
CHCHKRTN 
—C-REA-T-BA-T- 
CREATE 
DESTRUCT 
-tfftff— 
QIEPSUS 
DISK1ST 
“FBPP' — ~ 

. FPCNT 
.FFCMX- ‘ 


V4. 


08/17/74 0453 


FILE.BLOCKS/PAGE 

FREE PAGE COUNT 


FRONTP3 
FREED HN 
FREE Mil: 

FSWA ITS 
FSX 

.GETHEM : . .“ 

6ETPAGE 

givepage 

H SIT ABP, HSIT A 8 LP FOR 

HSITAB,HSILOG,HSITABL 

"ILL WRITE—....... 

IMPURE0 2 
INAOV 

iNaco ~ 

INQVF 

I N E P F-_:_: -_ 

INHIBIT 
I DEEP 
IOCLEAR 
IOSET 
I RUNSIT 

I RUN PEND.“““.“7. 

LATEFLAG 

_ 

LOGOFF 
MAXDEST 
MEMARRAY 
MEMSET 


ANYONE WHO WANTS TO LOOK 


FOR DUMPER 


* 
















































SCHEDULER 


Cl 


(FOR.DUMPER.ONLY) ... ;...... : .......:.* 

(FOR DUMPER ONLY) ^ 

__,_:.........„o 

.".~." ~.““ .~.".;.”■ .;. .. : .:.".". 6 o 

—— .. : ...'■.‘...~.~.^.o 

... ... .T~~... ................... 

LOW BATCH TERMINAL NUMBER 

.~....;.".~.:."..o 

..~.~.~~ . T ~“.. .“...‘ -i ^TTT.... : o 


LOW E ST.NUMBERED. SWAP .UNIT 


O 
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“.”.....".155 ......EX'"! 

156 EXl 

: , r . ' ..: - ,.....157—- - — -.-EX-1 

U 158 EX1 

1 15 9 EX 1 

1 -"S*********^.. “ wmr&m .160 ...-.... E-X1 

1 161 EX1 

1 (J> 162 EX1 

r M SB IT 

r MSCPTR 

h-.MSN A IT . 

r MXQCOM 

r MXQQ 

r--‘iTffATCttQ-- 

NBA! PSA 

[.,......NBIT.2 3. 

l 163 EXl 

164 EXl 

. ..16.5 ... py.1 

r NBIT 22 

r N BITS 

r... NIFW A IT. 

Q 166 EXl 

16 7 EXl 

r NK8ITS 

r NMSWAIT 

169 EXl 

0 170 EXl 

....ItMTW'ATT— 

r N PAGESMi 

r NQWAIT 

. 171 EXl 

171+001 EXl 

r NSWAPUNT 

I' N TAPED 

r......N T R T T S_- 

O 173 EXl 

173+001 EXl 

r NUMPAGES 

r 07777777 

....-.-.....*.17 4 .. """* *. EXT 

174+001 EXl 

O 175 'EXl 

U Pn5 G 

r OPMSGX 

r PAGEMSA 

. ....~ ~. ..... . .17 6 ..EXl 

177 EXl 

. ... .. i„7 g..,. .EXl 

f. .-’P’AG’E RE'C 

" PAGET ABL 

r,.P-AGFT-IME. 

O 17 9 EXl 

180 EXl 

t |. #1 “ii 'M ■! Lm> 

r p.Q 

r P CHARS 

. .........•'“""T81 ...—E-X-i 

182 -EXl 

O 183 EXl 

r."-'-p'S'ABL K. 

r PTRTTY 

r PTRUNIT 

.". I Eh . EXl 

185 EXl 

. i fif. FYl 

r...~. foreost 

r PUREIABL 

r nnOMTROi 

O 187 EXl 

188 EXl 

.....—...............'......-.—-.-EXl 

19 Q EXl 

O 191 EXl 

r CITABLE 

r RADTTY 

r .RAOUNIT. 

r READ 

r....R EGS A VE .... 

. .'.19’2 ..EXl 

193 • EXl 

j[ 0j £|,. . .. 

R E i b R N 

F REWRITE 

r p F 

O 195 EXl 

196 EXl 

. 197 EXl 

■ 198 EXl 

O 199 EXl 

r RF7 7 

r RTN 

r. • RTNCOUNT 

r SCREAM 

r SELECT 

....•.......?0’0 ...“.EXl 

201 . EXl 

-2QP .............EX-l 

r.— swap 

r 3 WAPBIT 

f..2 W81-T . 

O 20 3 EXl 

PC 4 EXl 

2 C5 EX1 

_ 20 6 EXl 

O 20 7 EXl 

r s yscm 

1 SYS CODE 

r . - SYSERR. 

r t i 

r T 2 

.. . 208. EXT 13 

209 EXT T 4 

Pin FYT TF 

O 211 EXl 

212 EXl 

. 213 ' ■ ' 'EXl 

^ 214 EXl 

O - 215 EXl 

9 --- : .:..’. ...216.. .1..*.EXl 

217 EXl 

~ 3 —.-.-.-.-..217+001...-.EX-1 

Q 218 EX' 1 

219 EX" 

...--219 + 001 - .EXl 

~ 219 + 0 0 2 EX" 

O 220 EXl 

C5 '"~....."...."...221.....EXl 

222 EXl 

O 224 EX' 

X 224+001 VMMMASK EQl 

0 000 0 0 0 00 0 000 22 6 VMM ASK OC" 

09002 0770 0000 227 LOGMASK 0C1 

r TBATCHN 

i TERMINAL 

F-‘ . TIMEOUT. 

f TIME KILL 

r TIMELEFT 

r.TTPIS'ET . 

r TOTAL TIM 

r-..TPUN ITS. 

r TRUNTIME 

r UD8ITS 

r UDESTLP 

r UTAPEMAX 

r VALUE 

1--- VMM . 

r XNSKIP 

t XQUANTUM 

r Z ROPAGE 

J 07777777 

r oooooooo 

r 07700000 


-q 


o 


SCHEDULER 


NUM3ER OF BATCH PSAXS 


NUMBEROF SWAP.UNITS.. 

VMM MASK 

TABLES, PAGE.. MASS STORAGE ADDRESS 


FOR LOOKS 

60000000 

SPECIAL OEVICE BITS IN PSA BLOCK 
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140B 

32 


0013 

40003 

0 


223 
7773B 
T7743 
0 008 

-3-53...-. 

5 50 3 
5548 
1 - 000 'S"- 
40008 
2 0008 
TPnnre - 
i 

- 2 -- 

3 

*47"7"7"B'+"i"' 


.“"BASE.ADDRESS.IN.PAGE.INDEX.FILE.". 

NUMBER OF PAGES PER USER 
—MUST BE.A.POWER.OF TWO.----- 

4 FILE 8LCCKS PER PAGE 
LENGTHOFAPSA 

INSTRUCTIONS WITH THIS SYMBOL IN 
THEIR ADDRESS FIELDS ARE STORED 

INTO. BY OTHER INSTRUCTIONS.'. 

PAGE FILE ADDRESS FOR RESIDENT 

.PFLCC.*.2*44..—.-.-.- 

ALL INSTRUCTIONS THAT READ OUT OF 
THE PAGE FILE. HAVE THIS IN THEIR 

.ADDRESS FIELDS 

ALL INSTRUCTIONS THAT WRITE INTO 
THE PAGE FILE HAVE THIS IN THEIR 

.ADDRESS.FIELDS... 

INSTRUCTIONS WITH THIS ARE 

.USING.A.PROGRAM STATUS AREA.. 

THIS INDICATES THAT THE 
INSTRUCTION IS USING THE 
- PSA.BLOCK-.-.-.—----- 


RF WORD.F-C-R—NUMBER.OF.US-E-RS- 


MArX- 'DEST IN AT 10 N.CODE ( NOT ' MACRO) 


4LCSA4-— 
FCS+2 
~lS + 3 

8 IT2 3 
B ITS 2 

BITlo. 

B XT1 5 


HARDWARE.TYPE.OF.CARD.READER" 


I/O IN PROGRESS 

SEZ FC BLOCK RESERVED FOR PAGE 

OCCUPIED----.. r . 

ALTERED 


000028 
0 0004B 
0GQ0 68' 
000108 




USER INTERRUPT L 

BCD FAULT 
DIVIDE FAULT 
ARITHMETIC.FAULT 


'LGATING 


FAULT 


—__AN.INTERRUPT.STORES.INTO.WORD. 

AND JUMPS TO K+l 
M CONTAINS THE FOLLOWING 

'j-A4'6/'AOOR£S S • — . 






FILE.CONTROL.BLOCK.„0£FINII.I.Q!iS. 


CQREP+4 

4 


-ACCOUNTING-WORD (MUST.BE 0). * 

LOAD POINT BLOCK * 

CORE POINTER IF NGN-ZERO * 

TP. a IT 2 3.=. 17 .CORE.BL O CK HAS .* 

BEEN WRITTEN INTO * 

BLOCK.NUMBER.OF .THE. CURRENT.BLOC* 

CURRENT POSITION POINTER * 

(REL. FOSIT. WITHIN BLOCK C8P) * 

81T23.S EZ RE A D - ON L Y-.-.- - - - - -.* 

8IT22 SEZ AT LCAO POINT * 










































o 

o 

o 

o 


o 

o 


o 

Q 

o 

o 

o 

O, 

o 



MEMORY PARITY ERROR INTERRUPT HANDLER 



BIT21 SEZ END OF DATA 

BIT2Q SEZ FILE HARK JUST READ 

* 

* 

BIT-18 SEZ BINARY RECORD PROCESSED 
BIT17 SEZ ABNORMAL/UN AVAILABLE ■* 

5 

. bl 1 lb St/; HUUKCii tKKUK 

BIT15 SEZ SAVED FILE 

NUMBER OF BLOCKS BEYOND 

* 

6 

~...THE.CURRENT.BLOCK. 

END POSITION POINTER 

.. 

* 


....BIT-22.SEZ.THE.FILE.HAS.CHANGED .* 

BIT21 SEZ POSITIONER READY * 

BIT20 SEZ DESTRUCTIVE READ 

— *— ----FIL £ ‘ 01R£ CT OR Y..— 

BITS 15-18 CONTAIN THE HT 
BITS 00-14 CONTAIN END POSITION * 
7 . .TOTAL.LENG TH.IN BLOCKS.* 
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•¥■ -V- -A-.'- ¥ *■ iMf * Af *¥■ *¥• V * V ■¥•* * * ■¥ ¥ ¥¥ •¥ *» ¥ ¥ ¥ V WMfWWWV 


0 0 0 0 3 
9 0 00 4“ 
0 000 5 
0 00 06 

.000 07“ 

0 0010 
00011 
0 0012 
0 0 013 
0 0014 
00015 
0 0016 

00017. 

00020 
00021 
0 0 0 2 2 
00023 
00024 
00025 
00026 

00027. 

Q 0030 

.00031. 

00032 
00033 
0 0 034 
0 0 0 3 5 
00036 

00037. 

0 Q 04 0 

00041. 

00042 


P 

,p,_ 


45003332 
47200843 
77630000 
42 000227 P 

.1760 0040. 

030QQ1Q7 P 

. 200 . 0.0 0 21 .,. 

13077766 
14277775 ' 

±3 00 00 0 3. 

1760 0 0 07 '■ 
42415436 P 
“0 Z 2 0 0 0'I'¥“F' 
11015410 P 

.1470 0 0 30. 

142UQ024 
31077777 
•7767400-0 
03000107 P 
77670000 

“O3W0TQ7.P 

54200021 

. 17.2 £1.0-0.07. . 

01200033 P 
0 0 777 777 X 
09-70 0 033 X- 
01000076 P 
01000042 P 

.09777777.X 

00700034 X 
.0 0 70 0 0.37 .X 
25003332 P 


P 

X 


00045 3 


03 3 07 .2 

03302 0 

■ 'Xir-?: 

±1 

.zr 


294 

.295.- 

296 

29 7 

298 

299 

300 

301 

302 

303 

304 

30 5 
-306 

30 7 
308 

.209. 

310 

"3i2~ 

313 

314*' 

315 

316 
“317. 

31 8 

-319-. 

320 

321 
.322. 

323 

324 
“325. 

326 

327 

32 e 

329 
-33 0- 

331 

332 
“333“' 

334 


♦ 

v 

* 

* 

¥■ 

* 

* 

¥' 

. 


* 
* 

--- 

-V- 

.... : .# 

. .. , .. . 

* 

-_-*-— * .*• 

* 
* 

.~..# 

❖ 

. »»»» *#*****#### *•»»»» 


MEMORY RARITY.INTERRUPT.FROGESSOR....*. 

OS 3 WILL RECOVER FROM SOME PARITY ERRORS. 

THE PARITY ERROR IS NOT FATEL IF IT CCCURED 
IN THE' USERIT WAS A BLOCK 
CONTROL PARITY ERROR (READ OR WRITE)* OR IF A 
RNI PARITY ERROR OCCUREO WITHIN A *PURE*.SECTION 

OF THE RE SI DENT a IF T HE P AR I T Y ERROR C A NNO T BE 

PROCESSED THE SYSTEM EXECUTES A *RTJ MACHERR* 

.WHICH.MAY BE-RESTARTED AFTER THE PARITY ERROR 

HAS BEEN MANUALLY CORRECTED (THROUGH THE CONSOL) 
BY RESTARTING AT *MPAREXIT*. 

-HOWEVERtI^^ T 

SYSERR*, A CORE DUMP SHOULD PROBABLY BE MADE 
SINCE THIS IS CAUSED BY THE SYSTEM (OR CONSCU 
.^ T T E flP T X N"G ^ T C. R E F FE RE N C E.N O N T E XT S T A N T. MEMORY• . 


PAR INT 


ST A Q 
S TT—— 
OR A 
SACH 
ANA 

A2J»EQ 

.LOA- 

SHAQ 

EMI 

“SH-A-Q— 

AMA 

SACH 

.IJT 

ECHA 

.ENQ- 

ENI 

UJP 

-ISA.. • 

A2J,EQ 

OSA 

.S'ZJVEQ' 

LDI 


PARTEMR 
“M;PA-R-0'2i~X'2— 

CRSAVE+3 
.403' ' 

M PARITY 

-0-0-0218. 

-9 

- 2, X 2 

-9-—— 

000078 

RPARMSG+22,X2 

*-3,"X2. 

RPARMSG 
2 4 

*+2, X2 
OPMSG 

MPARITY 

H PARITY.... 

0 00218,X2 


LEAVE.THE.PROGRAM .STATE. BIT" 

JUMP IF FROM MONITOR STATE 


- 6 H £ OK-FOR “ PROG RAM—ST A T E~SY S*T EM* 
ROUTINES 


---.—. 

336 

337 


.-M444.---. 

UJP 

RTJ 

D T i 

-,- U~v-U~*....-. 

*+l t XZ 

SYSfcRR 

xxxo 

.. 0 a .c.-... 

, 339 

34 0 


K ! J 

UJP 

UJP 

i Yb tKK 

8PARITY 

MPAR01 

Aa X1 

XXX2 
XXX 3 

. 341. 

■ 342 

.14..3. 


RT _, . 

RTJ 

_RTJ 

H"AC'H'ERR . 

SYSERR 

MACHFRR 

- XXX4 

XXX5 
...XX.X6 

344 

MPAR01 

LOAQ 

PARTEMP 

XXX 7 


“JUMP.IF.THIS.IS.THE.PFANTCM, 

LOAD THE INTERRUPT COGE 


NON-EXISTANT MEMORY 

N G N- EX I S T A N T MEMO R V.-.— 

BLOCK CONTROL PARITY ERROR 
RNI/RAO PARITY ERROR 


NON-EXISTANT MEMORY 
ROP/STC PARITY "ERROR 














































o 

o 

Q 
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1 o 

00107 

54200021 



410 

411 


.00110 

00111 
.0 0112-.. 

17200007 
01200112 
. 00700040 

P 

X. 


412 
41 3 

. 414 

5 O . 

0 0113 

0 011 A 

00700112 

01000076 

X 

p 


415 
41 6 

o 

0 0115 
00116 
00117 

01000122 

00700041 

00700113 

p 

X 

X 


41 7 

418 

419 


.0 012 0. 

00121 

0 01?? 

00700116 
00700120 
?? on ni07 

.X. 

X 

n n o PI 3 

.420 

421 

.4 p p 

o 

00123 

00124 

04600003 

00700121 

X 


423 

424 

o 

0 U 1 c b 
00126 
00127 

f t t fit 

27000020 

14277777 

X 


■- 3 

426 
42 7 


~.00130. 

0 0131 
..00132. 

.0 7177777 

00700124 
.?.5-2001-30. 

“X. 

X 

x.. 


.42T 

429 

..4-3-0. 

o o 

00133 

00134 

0 0135 
00136 
00137 

03 36 0131 
44000142 
16677777 
53040000 
53600000 

p 

p 


431 

432 
—433 

434 

435 


. 0 0140. 

00141 
.0 0142 

. 1WQW30 . 

40400020 

36200000 



. 4315 " 

437 

.43 8 

o 

00143 

00144 

02600142 
40400020 

p 

o 


43 9 
440 

o 

U U l H t? 

00146 

00147 

.74rU‘ , o"u' 

22000227 
77730 000 

r 

P 

00045 3 

442 

443 


.ootso. 

00151 
0.015 2 

. 77E'3’4“ff"{T0 . 

25 00 3332 
.0-1-40-0-820. 

P 


444 . 

445 
.445 

O . 


0 0153 

p 


447 

448 


•V- ^ V- -Y~ -V- V-V-*r V- V‘-^ -V -V- ^ V V A- -V -V J r A'- A' 'V ^ J r A- 

* V- 

* -—.THIS.SECTION.PROCESSES PARITY ERRORS .THAT ..-.* 

* OCCURE WITHIN THE MONITOR. * 

*■ * 


MPARITY LDI 

. ANI . 

UJP 

.RTJ- 

RT J 
UJP 

——~“—-twf>—— 

RTJ 

RTJ 

. RTJ 

RTJ 

MPARRCVR.EACH.. 

ASE 

RTJ 

LGL 

ENI 

. MTH.. 

RTJ 

-_...LuAQ.- 

AZJ,LT 

SWA 

—————-X'Q-A—•— 

AQA 

TAI 

EN - fl . 

ST A j I 

RECREATE.SC A- 

IJD 
ST A j I 

MPA REXI T LDI. 

EACH 

VFD 

“.".'.ICR 

LDAQ 

__ .-.-...._UJP,. I. 


00Q21B,X2 
0U007Q»X2 
*+i, X2 

.SYSERR-- 

SYSERR 
8 PARITY 
~M PARRCVR - — 
MAGHERR 
SYSERR 
MAGHERR 
MACHERR 

213*4+3- 

Q 38 

MACHERR 

7 7777 B.-. 

G0Q20B 
PURELIST ,X2 

.PURETABLVI. 

MACHERR 
P U RE 7 A 8 L s X 2 

* “2 

RECREATE 

X2 

0 

0 00208 

.IMPURE >X2— 

*-±, X2 
000208 

"M-PAR'3-2tX-2— 
CRSAVE+3 
A12/DINT 

PARTEMP 
.(UL02.0&._ 


LOAD THE INTERRUPT CODE 


XXX0.=—NON-EXISTA NT MEMORY. 

XXXI = NON-EXISTANT MEMORY 

XXX2 = BLOCK CONTROL PARITY ERROR 

XXX3 - RNI/RAE PARITY ERROR — 


XXX4 

XXX5 = NON-EXISTANT MEMORY 

.XXX 6.... 

XXX7 = ROP/STC PARITY ERROR 

LOAD .THE INTERRUPT.CODE. 

SKIP IF AN RNI CORE CYCLE 


DETERMINE IF THE PARITY ERROR 

OC CUR REO.WITHIN.I.PURE REGION 

BETTER LUCK NEXT TIME 


RECREATE THE WORD IN ERROR BY 

VI RTUE' 'OP“ THE- F ACT.TH AT* 'PURE.CODE 

REGIONS HAVE AN EVEN PARITY WORD 
IN THE LAST LOCATION 


PUR EG2 EQU 


ZERO I HE WORD IN ERROR 
■CREA TE.-TH E X O R.-OF.-T HE.RE-610 N. 

RESTORE THE WORD IN ERROR 
RESTORE- INDEX 2 - ■■.———— 

ENABLE PARITY ERROR INTERRUPTS 
RESTORE THE CONDITION REGISTER 
RESTORE A AND Q 

-RE-T-URN-..._....1-- 

BEGINNING OF PURE REGION 02 


o 
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l a 


<3 


a 


Q s 


m 


45 2 
.453. 

454 

455 
45 6 

457 

458 

459 


~W9~ 

9 

. 9 . 


SCHEDU 


LR 


ILLEGAL WRITE INTERRUPT HANDLER 


9 

9 

- 9 — 

V- 

9 


^ >' #' ¥'¥ X . * ¥"¥ * * ¥ * ¥ ¥ ¥ 4 ' V ¥ #'¥" ¥¥¥¥' ¥¥'¥' ¥¥¥¥¥¥'■' 

¥ 

.-..— THIS ROUTINE PROCESSES.ILLEGAL WRITE INTERRUPTS, * 

THE ILLEGAL WRITE IS ANALYSED AND THE PAGE WHICH * 

WILL ALLOW THE USER TO CONTINUE RUNING WILL BE * 

— REQUESTEU. IF THE PAGE IS IN MEMORY» THE P AGE" — — — *~ 

FILE WILL 8 E UPDATEO TO INDICATE THE PAGE IS * 

. LEGAL . IQ . REFFERENCE ... : ....... *. 

9 9 ww ** 999999 999 *999999999 9 9 A* ■* 9 AA 9 9 9 9 9 9 9 Af Af 9999 999999999 9 999 


o 

00153 

00153 P 
00700044 X 


462 

463 

ILLWRITE EQU 

RT J 

9 

REGSAVE 

SAVE THE INTERNAL STATUS 


o 

.0 015 4 

00155 

77 /4 0 0 0 0 . 

77537000 


...4' 6 " 4..* 

465 

4 66 

VFD 

SCIH 

¥ 

.A 12/ElNT... 

7 00 0 B 

PREVENT INTERNAL FAULT INTERRUPTS 
ALLOWED IN THIS ROUTINE 



0 0156 

0 0157 

____0046-0. 

.20 0 77777 X.. 

03100162 P 

...7.7, 7fl-0--0-L.fi___ 


.467. 

46 8 

.nrs.*..“ 

AZ J 1 NE 

...........TWC.. 

. S"CREm . 

THIS CODE LEAVES THE ILLEGAL 
...MP TT F 1 T9 NT ON- TC SPPFAM.. 


o 

o 

0 0161 

0 016 2 
00163 
00164 
00165 

010U 0162 P 
20Q00014 

.4028 0 050.X— 

13077760 

77674000 

— 

... 

47Q 

471 

—472— 
47 3 
474 

UJP 

LDA 

SHAG 

ISA 

. “t u q f y .... 

AH-l 

149 

——— 

-15 

IS NON-ZERO 

GET THE PROGRAM COUNTER 
—ft N -B-S-TO RE.IT INTO.T HE.PS'Ar~-~--— 



0 016 6 . 

00167 

... 0 017 0 

13080004 

5360 Q 000 
.776540-00..-. 


475 

476 

...4-7-7... 

SHAQ 

TAI 

PF A 

4 

X 2 

.■ p pp . y?.. . 



o 

0 0171 

0 017 2 

. ., 77 , .. 

i.4704000 

0340 0705 P 


478 

479 

ENQ 

aqj,eq 

4 00 0 B 

R HPAGEIN 

JUMP IF RNI WAS NOT POSSIBLE 


o 

U u 1/3 
00174 

U 017 5 

//o / t li u u 
42015544 P 
77674000 

03331 0 

.48.0. 

481 

482 

.*....*.'USA. 

SACH 

ISA 

OSRSAVE 

SAVE THE GSR 



0 0176 
00177 

..... 0 0200 . 

77660000 
55400000 
..2.i-4-Q4-0-14. 


"48'3""' 

484 

....... 43.5 .. 

' ' AOS . 

VFD 

LOO, T 

A9/ROS 

Q 00148 

.~.PUT'THE.X’SR.INTO.THE.OS'R"..... 

■ ..FFTOH THF OFFFNOTNG T NST ROOT TON 


o 

u 02 0 I 
00202 

55000000 
41003321 P 


486 

487 

VFD 

stq 

A9/RIS 

IRTEMP1 

SAVE THE INSTRUCTION 


o 

C 02 0 3 

0 0204 

0 0205 

' 22015504 "P" 
53500000 
22401044 P 

."Q332i'"0 "" 

.. 00211 0 

" 48 8 . 

48 9 
490 

LA C H 

TAI 

LACH 

.IRThMPl... 

X 1 

IRIT ABLE* XI 

LOAD 1 THE OPERATION CQQic 

LOAD THE OPCODE TYPE 



.~. 0 020 6 . 

00207 

_..._ 00210 

53500300 

13000030 

. 01.10 0 231 p .. 


4~§I 

492 

..___ 

.'.'.~.~.TAI.'. 

A Q 

....UJP._ 

XT . ... 

2 h 

.IRQ£C00 E i> XI _ 

...AND.PUT.IT.INTO.TTOJEfTT - . 

OFFENDING INSTRUCTION TO A 
_...JUMP-.TO -THE .APPROPRIATE.ROUT-IN E.. 


o 

MMMWM '*««* A *■ H *0 /M ** A MM MM 



494 

495 

/** •** * . • . V-, •: 


Jim V-/ V/ w 1 W y' A Jt, w - 

w iTt —. E V W-I to.“ f f • IX w r1Viin“l“lw. w VIA If to.. 


o 

0 0 241 
00212 
00213 

lb ul U U 0 0 

00 00 1314 
15000000 


49b 
'49 7 

4 9 8 

1RIThDLC 0U i 

OCT 

OCT 

16010 00 U 

00001314 

15000000 

“HQ* : • Q3 

04 07 

10 13 



.00214. 

0 0215 

_.0.0216. 

nnnrawinr 

01010710 

01 03 0 301.. 


g..g. 

500 

_5-0-1_ 

0CT 

OCT 

OCT 

. oooaooGO . 

0101Q710 

_Q1Q303Q1_., 

. 14 17 .: : 

• 29 23 

24 2? 


o 

0 0 217 

0 022 0 

.*0 0 221— 

00222 

00223 

01010303 

04010101 

04041112 

04068405 

01010100 


502 

507 

5 0 4 

50 5 

50 6 

OCT 

OCT 

—-—_- — -ecT 

OCT 

OCT 

01010303 

04010101 

—oneroi^-tirjLP"^-* 

.0 4060405 

01010100 

30 33 

34 37 


q 2 


__ tjrQ 43' 

44 47 

50 53 



.00224 

00225 

..0 0226 

.ffzrnnmre. 

03Q30303 

.17171717... 


..507". 

508 

.509 ~ 

.. ’ ” OCT 

OCT 

OCT 

0"2IW3¥3~ . 

0 3030303 

_17171717. 

54.57 : ■' .. ' . 

6 0 63 

_ __ 0£§. _■ . .6-7'_ - _ ■ , . , ..... 


a 1 

00227 

00230 

15000000 

00 00 0 00Q 


510 

511 

OCT 

OCT 

t >4* f .4m- f JL, 9 

15000000 

0000000Q 

70 73 

74 77 


o. 









o 8 

.0 0231" 

00232 

‘0T00'0‘6‘05.P. 

01000262 P 


513 

514 

.5..1S.... 

..“TREJECODE .UJP.. 

UJP 

-j- RHO - RH -.— 

IRLDA 

- 00 ._.SHOULD.NCT. GET .HERE.. . : ‘ 

Ol-UJP,LOA,LDG,LCA,LOL,ADA,S8A 
. S7 A , SC A , I P f , MU A, D V A , C PR .- - — 


0 0233 
00234 

01000444 P 
01000320 P 


516 

51? 

UJP 

UJP 

IRLGI 

IRLDAQ 

02-LOI 

03-LDAQ,LCAQ.ADAQ,SBAQ,MUAQ 



00235 
0 0236 
‘00237 
00240 

.00.241 

00242 
00243 
0 0244 
00245 


0100 

0100 

0100 

0100 

. 0100 

0100 

0100 

0100 

0100 


0316 

0442 

0 33U 

0370 

0.36.6.. 

0363 

0 361 

0414 

0412 


518 

519 

520 

521 

522 
.5.23 

524 

525 
52 6 
52 7 


UJP 

UJP 

UJP" 

UJP 

UJP 

UJP 

UJP 

UJP 

UJP 


IRSTA 
I RS I I 
IRSTAQ 
IRLACH 

IRLQCH. 

IRSACH 

IRSQCH 

IRMEQ 

IRMTH 


04 

05 

06- 

07- 
i n 


D VAG,F AD j FS BjFHU,F D v 
RAD,STA,STG,SWA,SCHA 
STI 

STAG “ 

LACH 
i nru 















































WRITE INTERRUPT HANDLER 


15- SSH,LBR,S3R.. .. 

16- RTJ 

17 -»BCP INSTRUCTIONS (64-67) 


GLOBAL PAGE NUMBER TO A. 


RETURN 


SAVE THE INSTRUCTION 

GET THE INDEX BITS 

LEAVE ONLY THE INDEX 

J U M P.I F.NC.IN D E X.MO D I F IC'AT 10 N. 


LOAD THE INDEX REGISTER 

EXTEND.‘THE."STON"i 


JUMP IF NC INDIRECT BIT, 

- PE R F 0 R M.I HE.I-N DIR EOT.A SORES SI KG. 

(INDEXED) ADDRESS TO A. 

15 BIT ADDRESS TO 0 
UPPER' 3 BITS OF i8 BIT-ADDRESS - 
GENERATE THE FACE NUMBER 
GLOBAL PAGE NUMBER TO X2. 


INDIRECTLY.ADDRESSED-.WORD-.IS.NOT 

IN PHYSICAL MEMORY 


LOAD INDIRECTLY ADDRESSED WORD«. 

GO TO.CHECK.AGAIN.FOR'" INDEXING 

AND INDIRECT ADDRESSING. 


ENTER THE RETURN ADDRESS 


ENTER.T H E.RET U R N.ADD R E S S' 


.-ENTER-.THE.RETURN.-ADDRESS- 


A STORE HAS BEEN DETECTED 

































a, . 

A SSEM3LER/US3 Vl.U 

0.9/21/74 2259 

PAGE 

11 SCHE DU LR 

ILLEGAL WRITE 

INTERRUPT HANDLER 


0 0 343 
00344 

......t) 0 345. 

54303323 
2130 0046 
—5-3-24-0. 00 0 . 

p 

X 

6 U 4 

6 0 5 

. 505 . 


LDI 

LDQ 

TT A. 

RPSAPTR,X3+PSA 
CR, X3 + PSA 

.X 2.. 

GET POINTER TC RUNNING USER PSA 

GET MEMORY PROTECT BIT 

.(TFT VMM PAGF MJKflFR. 4- 140R. . . 

0 

00346 

00347 

—0'0^5“ 0 — 

0 0 351 

1760 0037 
53740000 

'•J n 7? V “7 O O -J 


607 
60 8 


ANA 

IA I 

NPU-1 

X3+PSA 

GET USER PAGE NUMBER 

Cl 

cU o f f t(f 

0330 0672 

x.... 

p 

o U 5 
610 
611 


LOA 

AZJ,LT 

V MN j Xo^PSh 

I RHP 

GET Vrin WORD 

JUMP IF A SYSTEM PURECODE PAGE 


0035 2 
00353 

......00354. 

17644177 
40300350 
.53 700000. 

X 

612 ' 
613 

. 614 . 


ANA 

STA 

.yflX .-. 

1778 

V MM,X3 + PSA 

. . X3. . 

USER PURE PAGE, GET PAGE NUMBER 

INDICATE NOT PURE 

... .. pi j T.pflGF.NUMBER.T-N . X .1 .-.-.. _.......... 

o 

0 0355 
00356 

n n .7 

2 0 077777 
35300065 

X 

X 

,.,v .■.- 

615 

616 


LDA 

SS A 

BIT 21 

PAGET ABL,X3 

INDICATE IMPURE USER PAGE... 

o . 

U U 6o ( 

0 036 0 

4u oil u 0 56 
01000703 

x. 

p 

bit 

61 8 


STA. 

UJP 

PAoETABL jX3 

RMOSR 

o « « 1 N r A G E T A 8 L 

GO TO UPDATE THE PAGE FILE 


0 0 361 

.. 0 0 362. 

14677777 

01000364 

X 

. p. .. .. 

62 Q 

. . &.2A .. 

IRSQCH 

ENA 

...if j.p,... 

11 

T P5AG HI 


o 

0 0 363 

0 0 364 

n n i? cl ei 

14677777 
14 30 0 343 

X 

p 

Q .. . .. 

U 

622 

623 

IRSAGH 
IRSACH1 

ENA 

ENI 

12 

IRCHK,X3 


o . 

UUobp 

00366 

0 0 367 

ulUU U 3 f c 
14600363 
01000371 

r.. 

X 

P 

.Q'2’4 

625 

626 

IRLQGH 

OOP.. 

ENA 

UJP 

X RC 6 A 

12 

IRLACHI 

q c h ^ 


...00370. 

00 371 

_ : ... 0 0372. 

14600361 

14300605 

. 3..0 .0..Q.-3-3-2-3. 

X 

p 

,..p..:. 

~~~6Z7~ . 

628 

.TROGH. 

IRLACHi 
IPG HA 

‘EN7T . 

ENI 

ADA 

.XT. 

IRALARM,X3 
.RPSAPTR.-. 

. ¥¥ ¥ ¥ ¥............. 

O . 

00373 

Q 0 37 4 

53600000 

20200000 


630 

631 


TAX 

LDA 

X 2 

0 ,X2 


o _. 

' U 0 37 5 
00376 

0 0377 

53600000 
20003321 
12000006 

p 

6 32 

633 

634 


: AI 

LOA 

SHA 

IRTEMP1 

6 

GET THE INSTRUCTION 


00 40 0 

0 0 401 
___ Q0402 

.04 2 04446. 

12000001 
. 1.2-0-7-7-7-70. 

.p".~. 

.. "oJ5 . 

83 6 

. 5 . 3.7 ... 


--gj'jj'GE . 

SHA 

-SHA .-.. 

.TRCCARET.'. 

1 

.JUMP'.IF.NUT.XN'D'EX‘E'0'".*.....~ 

O . 

0 0403 
00404 

53240000 

12077775 


63 6 

6 33 


AI A 

SHA 

X2 

-2 


o. 

.G O 40 t>.' 

0 0406 

0 0 407 

01 0 0 Q433 
12000020 
Q10UQ433 

“P ■ .... ~.. 

p 

6 4 0 
641 
64 2 

IRCCARET 

C J P 

SHA 

UJP 

“ "TRZA'P. 

IRZAP 



__ 04440.- 

14 300 343. 


.6¥3. 

644 

.. 0.44? ... 

__ X-RS-SH-_— 

.pklt ..._...... . . 


O . 

00411 

Q140 Q 433 

p 

6'46 
647 


UJP 

•IRZAP'" ' 


o 

00412 

0 0 413 

54303323 

02300415 

p 

P 

6 4 8 

649 

650 

IRMTH LDI RPSAPTR,X3 

IJI IRSHARE j X3+PSA 

JUMP AND SET 8 IAS FOR 12 


_ 0 0414. 

. 54 3 0 3 S P 3 ■ 


651 

652 

. 6.5-3.. 

-¥ ^ N:£ Q 4 . 

___ mMPO __L.HT. .. P.Ml.Pl.ft.. A .0 ...._. 


a ^ 

00415 

0 0 416 

n n i. 4 ? 

2 0 3 U 0 3 7 0 
53500000 

X 

r-% 

654 

65 5 

IRSHARE 

LOA 

TAI 

li,X3+PSA * 

XI 


q 2 _ 

U 0 41 / 
00420 

0 0 421 

d U OOvvJtl 

13077760 
1760 GO 07 


hbb 

6 5 7 

6 5 fi 


CD A 

SHAQ 

ANA 

i RT t r; P 1 
-15 

7 



00 422 
00423 

_-_ 0 0 42 4_ 

.0464444T. 

14 60 0410 
. 5.3140 040. 


0.5 9 
66 0 

. 6-61 .. 


~KSU~ . 

ENA 

■ AIA_ 

. 1 ..... 

1 0B 

. . . . XT—.-...-... 

..._.„Q.o. N01TL_U.se . RA-Q . XI .. HERE-.*... 

O' ' 

00425 

00426 

44300415 
1340 0 030 

4 O-n 7 “70 f c 

x . 

682 

663 


SHA 

SHAQ 

11,X3+PSA 

2 4 

CF, HARDWARE BUG. 

o„. 

u u 4 c ( 

0 0430 

00 431 

l£ 0 r//bo 

5 3 54 U 0 0 0 
14300605 

P 

66 5 
666 


S n m 

IAI 

ENI 

*• 3 

X i 

I RALARH»X3 


P; .i.:. 

..~.Q4432. 

00433 
. : . 04 434 

5310 0 0 00 
13077760 
54203323 

.p____ 

667 

6 & 8 

. 6.6 ,c_. 

”..IRGEARET. 

IRZAP 

TIA 

SHAQ 

1 DT 

.XT. 

-15 

.RPSAPTR., X 2 

.i 5 -aiT “ATTD'RESS .TO.A.~. 

SAVE THE ADDRESS IN Q 

o 

00435 

00436 

n n 7 t? 7 

20200344 
1760 0 0 04 

X 

670 

671 

.. . rr -J O 


LDA 

ANA 

CR,X2+PSA 

0 43 

. T n7 A D7. 

LEAVE THE ROS BIT 

o, _ 

U U HO / 

0 0 44 0 
00441 

UOUu4 2 5 q 
22015544 
. 01000254 . 

,.,p , . , 

P 03331 0 

P 

. O / £ .. 

673 

674 


az. j % m 
LACH 

UJP 

IRZAP/. 

OSRSAVE 

IRZAPQ 

RELOCATE WITH THE OSR 





675 . 

676 

.677.. 




.. SECTION.TO.PROCESS. LDI. .A NO.ST I.—._T_.-.___—... 

o**~ 

00442 

0 0 443 

14300343 

01000445 

P 

■P . 

67 8 
679 
684 

IRSTI 

•sn w¥ 

ENI 

UJP 

IRCHK,X3 

- I-RCTA- .. 

ENTER THE RETURN ADDRESS 


6 81 


o 2 

















































INTERRUPT HANDLER 


SAVE.THE-TARGET ADDRESS 


tOCAL PAGE NUMBER TO X 2; 

INDIRECT BIT TO HIGH A. 

JUMPIFNOINCIRECTADDRESSING. 


MAKE A GLOBAL PAGE NUMBER. 


JUMP IF THE PAGE IS NOT IN CORE. 


..CALCULATE.THE.V AL UE OF P'+2.WITH. 

THE APPROPRIATE SIGN EXTENSION 

—SA VE.THE ■ A CORES S- .-. 

VERIFY THAT THE THIRD WORD CAN 
BE LOADED ON THE RNI CYCLE 
—RELOCATE TO THE USER MEMORY 
LOAD THE THIRD WORD 
SINCE Q HAD AGQO IN IT, THIS 

.LEAVES.GO 0 OXXXX.IN.Q...*. 

MASK TO THE FIELD LENGTH 

-.CALCULATE.A-MAXIMUM SIZE.FOR.THE. 

LENGTHS OF THE FIELDS . 

AND LEAVE IT IN XI 

.CERTAIN 66t'X—I NS'T RUCT IONS * ALW A YS- 

PROCESS 16 CHARACTERS 

LOAD THE FIRST TWO WORDS ____ 

SAVE OPERATION IN X2 

.SIGN."EXTEND.THE.CHARACTER.ADDRESS 

.SAVE-INTERMEeiATE.RESULTS- 

IN ADDITION TO THE OPERATION, THE 
LEFT THREE BITS OF WORD TWO HAVE 

.A.LOT.O F.INFLUE NCE, SOM ERGE'THEM 

IN AND MASK THE RESULT 

"ASSUME AT LEAST 16 CHARACTERS 
DETERMINE IF THE INSTRUCTION IS 
ONE OF THE RIGHT-TO-LEFT KLUDGES 
SKIP IF LEFT-T O-RIGHT ADDRESSING 
HANDLE RIGHT-TO-LEFT PROPERLY 

.LOAD THE ADDRESS OF THE PSA 

LOAD THE USERS CONDITION REGISTER 

—LEAUE.THE.ROS.BIT.:.-..-. 

JUMP IF RIS IS IN EFFECT 
LOAD THE USERS CSR 


LEAVE THE INDEX BITS 
‘"JUMP.IF.NO.INDEXING'--- 

SKXR.-IE.B-Y.X2...._ 

OTHERWISE, USE XI 

“CREATE THE SIGN - EXTENDED- INDEX— 
AND AUD IT TO THE ADDRESS 
LOAD STARTING CHARACTER ADDRESS 
CHECK IT OUT..... : . 

MISSED.ON THAT.ONE......1 

CREATE ENDING ADDRESS 
AND CHECK IT CUT ALSO 


MISSED AGAIN, SC WORK ON THE 


















































ASSEM8LER/0S3 VI.G 09/21/74 2259 PAGE 13 


SCHE DU LR 



ILLEGAL WRITE INTERRUPT HANDLER 


7". 

-7 

3. .......... 

OTHER FIELD 

SIGN EXTEND CHARACTER ADDRESS 
...1_E a \I P.A PPR CP R IATE.INDEX.PITS ...- 



i 

IR30PNSX 

SKIP IF INDEXING 


‘~Q 

,,,,,, ... * p 

RPSAPTR 9 X o 

2 

* +3 

SKIP IF WITH X2 


._ ,G 

I2* X3+PSA 

T_t vXX+PS A-. . 

LOAD X2 

..OT H F R W T S F ...US E.XI.-........... 



9 

-9 

SIGN EXTEND THE INDEX REGISTER 


o 

IRTEMP2 
*+2, X3 

AND ADD IT TG THE ADDRESS 

STORE THE STARTING ADDRESS 

AND CHECK IT CUT 


. hO 

IRZAPC 

IRCHK 

ip.tC M-PP-.-... 

CHECK FOR READ ONLY PAGE 

..tUD«.TTM ST.I n SC C......... 


.6 

<fJL> & t 4w»* R k & imt 

XI 

*+3,X3 

i i % w w * jl i § w w w w l. rs 

CREATE THE ENDING ADDRESS 

AND CHECK IT CUT 


o 

..,„(H 

'-'17 .—.. 

IRZAPZ 

IRCHK 

CHECK FOR READ ONLY PAGE 


._. ,o 

OSRSAVE 

7; ? 

ILWERM 

ILWERML 

TELL THE OPERATOR 

THAT EITHER HE IS PLAYING 


o 

kET URN,X2 .. 

A12/DINT 

OPMSGX 

WITH SWITCHES OR KONPEWTER IS 

CRAZY. 


... o 

OSRSAVE 

RPSAPTR,X3+PSA 

I RE R ft OR_ 

ILLEGAL WRITE 


o 

08/000,08/120,08/ 

014,08/350 




O 


O 

O 


O 

G 

o 

O 

O 

O 

O 


O 

































































(f 

a- 

ci 

a 

a 

a 

G 

o 

o 

o 

o 

o 

o 

o 


0 Q 66 2 
0 0,66 3 
0 0 66 4 
00665 
0 0566 
00667 
0 0 670 
0 0 671 


45377777 

20,0 7 7 777. 

77664000 
37377777 
34300640 
16477777 
34300665 
mroTOO'G.. 


ASSEMBLER/Q 

iS3 VI. 0 

.09/21/74 2259 

PAGE 

14 SCHE DU LR 

ILLEGAL WRITE 

INTERRUPT HANDLER 


.. 0 0 622. 

54 in 3 331 

P. 


791 

792 

793 

* 

.R MR A R F. 

A PAGE IS 

LOT. 

MISSING FOR AM 

XTFMP .XI. 

INDIRECT CYCLE OF A STI OR LDI. 

i n AO. 1 HE.T ARG E T.A DD RESS.. 


0 0 62 3 
00624 

14 701171 
010G0630 

P 

P 


794 

79 5 


ENQ 

UJP 

R MINOR 

RMZORCH 

ENTER THE CONTINUATION ADDRESS. 






796 

797 

79 8 

* A PAGE 

IS MISSING FOR AN INDIRECT CYCLE OF A LDA TYPE INSTRUCTION. 


. 0 0 625 

00626 

..0 0627 . 

14606 0 40 
42015505 
, 1 , 4 , 7 , 0 ,1-06 2 . 

P 

P.. 

03321 1 

799 

800 

.3 01. 

RMPLAGUE 

ENA 

SACH 

PNQ. 

463 

IRTENPl+1 

R MCH A IN. 

REMOVE INDEXING 3ITS FROM INSTR. 


0 0 630 

0 0 631 

4710 3 32i 
54303323 

P 

P 


802 

80 3 

RMZORGH 

STI 

LOI 

IRTEMPl) XI 

RPSAP TR)X3 

SET THE LATEST 15-BIT ADDRESS. 


0 0632 
00633 

0 0 634 

22015544 
77660 0 00 
20300163 

P. 

X 

03331 0 

8 0 4 

80 5 
806 


L A 6 H 

AOS 

LDA 

QSRSAVE 

PC,X3+PSA 

RESiORE THE OSR 


..00 635 . 

00636 

.....Q0637. 

■4T30 0'634” 
2100 3321 
,141.00705 

.X. 

p 

.p.. 


80 7 

808 

. 3 no. 


ST Q'. 

LDQ 

PMT 

PC,X3+PSA 
IRTEMP1 

SHOSr.FTM. Y 1 

R E S T A R T H E R E IN M C NIT O R. ". 

REMEMBER THE INTERRUPTED INSTR. 

.cm TE R.T HE-- RE-T-L R N.- A D DR E SS..- 






aid 

811 


SETUP WILL SAVE THE USERS 

CURRENT STATUS AND 


00640 

40 377777 

X 


812"“' 

813 

814 

SETUP 

HL L U rf me 

STA 

UOCK IO KUN 

T1,X3+PSA 

P R 0 u R A rl 3 T A T c ZERO ® 


.. 00641.- 

0 0642 

- ..0 0 643. 

BO 66'3 316'" 
35377777 
, 4 . 5 .37,7.7.7.7. 

.p. 

X 

.x ... 


.81 5 . 

816 

.817. 


.LDA. 

SSA 
,ST AQ 

RMINCON. 

I 3 j X 3 + P 5 A 
. 12* X3+PSA.. ■ 



0 0 644 
00645 

53300000 

40300642 

O -i ,7 n a r* 0 -7 „ 

X 


818 

819 


TIA 

STA 

X3+PSA 

I3,X3+PSA 



.L) lib4-o. 

0 0 647 
• 00650 

'2'louOb2r. 

12400025 
77670000 

A 


82 0. 

821 

822 


L'UQ 

SHQ 

OSA 

G R j? X 3 +PS A 

21 

CR ROS BIT TO HIGH Q. 


.~ . 0 0 551. 

00652 

_0065 3_ 

13077774 
77674000 
,77666,0.0-0. 



"623. 

824 

.,8,2-5_ 


SHAQ'.“. 

ISA 

AOS. _ 

-3 . 



00654 

0 055 5 

...0 0656 . 

00657 
0066 0 

13077774 
20 003317 
12077770“ 
13000007 
40377777 

P 

X 


826 

82 ? 

“8-2-8— 

829 

830 


SHAQ 

LDA 

~sm— 

SHAQ 

STA 

RMINCON+1 

—7-—— *——— 

7 

T 4, X3 + PSA 



.0 0561. 

29377777 

.X""'""' 


8 31 


XTTA'Q.... 

AVX3 + PSA .. 






832 

8,33- 

834 

835 
3 3 5 
837 
83 8 
849 


iliTRET 


STAQ 

LDA..- 

AIS 

LPA 

RAD— 

XOA,S 

RAD 

DDF... 


I 5» X 3+PSA 
8 210R822. 

IS)X 3 + PSA 
-Tl-yXS+PSA 
7 777 78 
IS)X 3 + PSA 
O.X/l 


PREPARE FOR PROGRAM STATE ZERO. 
LEAVE ANY OVERFLOW OR FAULT BITS. 


RETURN. 


Q„ 










































































ASSEM8LER/0S3 VI.0 09/21/74 2259 


00672- 

0 0 673 

00674 

00 675 

0 0676 

00677 

0 070 0 

00701 

00702 

00703 

00704 


0 0 705 
00706 
0 0 707 
00710 




0 0 711 
0 0712' 
00713 
0 0714 

tnmnr 

0 0716 

-0 0 71-7 . 

00720 

00721 

00722 

0 0 723 
"OOTZA" 
00725 
0 072 6- 
00727 
00730 
0 0 731 
00732 
00733 

Tr07T4. 

00735 
-0-0-7-36 
0 0737 


00740 
0 0T4T 
00742 
-0-0-743- 
00744 
00745 
0 0746 
0 0 74 7 


00750. 

00751 
00 752 
-0*0*75-3- 

0 0 754 


0 0672 

-05-50-000-0. 

01000614 
5350000Q 
2 0 10 0 0 00 
53 50 0000 
17100177 
20 IQ 0 066 
35000067 
-4-0-30-0-35-3- 
22015544 
77660 000 


00705 P 

■zmnnr^F 

53500000 

-4-7-2-O-.Q-03-7- 

53240000 
15600702 
"5-3 70 0 00-0- 
47303336 
14700000 
"777nnnnr 

20300000 
-0-3-20 0 723 P- 
53700000 
1470G0Q1 
20300000 " ' 

40 BO 3337 P 

Tzrnnnnrr. 

033Q0750 P 

-1-2-00-60 0-1 .- 

03300740 P 
77644140 
120777/3 
17600177 
53503800 
~5 3 0 2 a 0 2 2 
30 0 7 V 7 77 X 
■ 40 17 77 77- X 
01003611 X 


47303331 P 

1430 0 3 01. 

00703134 P 
2140-3331 -P 
20003323 
45 ? 0 ft 0 0 0 
4770 3 231 ""P 
01001043 P 


03331 0 


-1-2-0. G..0-.0..M- 


03200755 P 
20000701 X 

"40 306800. 

Q1QQ0Q72 P 


0 0755 
0 0 756 
00757 
00760 
Q 0761 
0 0 762 
0 0763 
00764 
0 0765 
0 0766 
0 0 767 


00755 P 
20000355 X 

0450 0 000. 

4030 0000 
04700001 
.20 003346 


0310 1023 

14-46X7-76- 

12000027 

40003356 

14706 00 0 

14377777 


UJP 

TAI 

tD A 

TAI 

ANI 

LOA 

3SA 

•SI A- 

LACH 

AOS 

EQU 


PAGE 15 SCHEDULR 

"85T...... 

852 IRMP 

-8-5-3.-.-..-. 

853+001 
855 

.- 

857 
85 8 

.359.... 

860 

861--- 

862 RMOSR 

863 

”864...... 

865 SIM01 

866 

"WT". — .MFI'GErra 

868 TAI 

-66-9--.-. AM- 

870 AIA 

871 INA 

872 . TAX- 

873 STI 

874 ENQ 

1 YT5 . W'J 

8 76 
-6-7-X 

87 8 
879 

■8 80..—' 

8 81 

88 2 . 

863 

88 4 

- 3 8-5.-. 

886 
S87 

'88 6. 

sag 

.39 0. 

15 i 
-39 2 

8 93 .. 

394 
895 

396 ' ■ ++ T 

397 

89 8 RMPURF9 

3 99 

g a o 

90-1__-__-. 

9 tj 2 

90 3 

'90 4 .- - - 

90 5 


ILLEGAL WRITE INTERRUPT HANDLER 


EQU * 

USG,S.0 


IRFLAKE 

XI 

0 , XT 
XI 

1778 j X I 
P AGEMSA,XI 
BIT22 

.VMM .X3+PSA 

OSRSAVE 


JUMP IF MEMORY PROTECTION 
LOAD THE PHYSICALPAGENUMBER. 

GET.THE MASS.STORAGE.ADDRESS. 

MAKE INTO A PAGE ACCESS WORD 


LD A 

-AZ-J-j-GE- 

TAI 

ENQ 

LOA " ' 

ST A 
SH A 

AZJjLT 

-SH-ft-.-. 

A2J,LT 
APF' 

SHA . 

ANA 
IAI 

IMA . 

ADA 

ST A -- - 
UJP 


RPSAPTR 
X1 

-N-P-U-"4- r X-2-~ 

VO 

V MM 

~X"3 . 

L1TEMP1, X3 

A12/DINT" 

0 ,X3 

..*-*4 __ 

X 3 
1 

-'0 j X3. 


RMHAULIN 

RMPUREQ ' 
PS+PFW,X2 

1778 

XI 

"'CLOCK. 

H OUR 

PAGET IKE,XI 
RETURN 


RESTORE OSR 

USED FOR SYSTEM SIMULATION 

Wl'RTWTFre.RUNNING.USER. 

CHANGE . GLOBAL PAGE . NO. . TO LOCAL. 

POINT TO THE PROPER VMM WORD. 
POINTER TO INCEX 3. 

SAVE VMM POINTER 

SAY THIS PAGE IS NOT PURE. 

'PREVENT INTERFE R€HCE ...“ 

GET THE VMM WORD. 

.JUMP — IF.NOT.PURE.CODE-... 

POINT TO THE FAGE ACCESS WORD. 
REMEMBER THE PAGE IS SYSTEM PURE 

S AVE MAS S STORAG E.ADDRESS 

JUMP If PAGE IN BACKUP STORAGE. - 

JUMP IF PAGE IS PURE, COMING IN. 
FIX THE PAGE FILE. 

FORM. THE LOCAL PAGE NUMBER. ' 

GET THE CURKEM TIME. 

-SA-Y- ThE- PAGE WAS REFERENCED. 


iE DESIRED PAGE IS PURE AND BEING SWAPPED IN. 


ST X 
ENI 
RT J 

i f j. 

LOA' 
STAQ 
STI, I 


XTEMP,X3 

' iyx 3 . 


f, iz - 


"M 


E M P. 

RPSAPTR 

0»X3 

XTEMP,'X3 

RMQ04X 


LIST) . 

" TWO WORDS ARE NEEDED. 

GET THE BLOCK CF MEMORY 

GET POINTER TO FIRST LIST NOSE. - 

GET THE PSA POINTER 

SL7 ThE CONTENTS CF THIS NODE. 

LINK THE NODE INTO THE LIST. 

SET MASS STORAGE WAIT AND EXIT 


R MO K 
8IT2 2 
u , X 3 

MPARKILL 


TTWAUET 


ME-M-O-R-Y.-PARITY.BXT--T-G.-SIGN.-. 

JUMP IF NO MEMORY PARITY ERROR 
CLAIM IT IS A. ZEROPAGE 

STORE THE WORD BACK . 

UNLOAD THE PROBLEM ON THE USER 


A REQUEST TO PULL IT BACK IN FROM MASS STORAGE. 


90 6 

9 0 7 . ** "THE" DESIRED 'PAGE" HA'S '"BEEN.SWAPPED"''.OUTTO.B'A'CK-OP 

90 8 

-96-3..g-M.H-A-U-LXN--SM.A- 

910 AZJ,GE 

911 LDA 

912 ■ ■ ......3 T A.- 

913 UJP 

914 

"9T5.**.THERE.WAS.NOT.ITTIEHURY PARITY ERROR'WFTETTTH'E^’A'G'E.WAS.SWAPPED.OUT". 

916 ** GENERATE 

917 

915 RMOK 
919 

92 0 .... 

921 

922 

92 3. 

924 

.925. 

926 

927 

928 

929 


EQU 
LOA 
QSE > S 
STA 
QSE 

LDA . 

AZJ,NE 

ENA,S. 

SHA 

STA 

ENQ 

ENI 


* 

BIT21 

0 

0 ,X3 

E PAGECNT.. 

RMRS 

6 77.768. 

23 

S FLAG 
0 

IDLE,X3+PSA 


SKIP 

ELSE 

SKIP 


IF THIS IS NOT A PURE PAGE, 
SAY IT IS BEING SWAPPED IN. 
IF PURE CODE REQUEST 


MEMORY NOT FULL, QUEUE SWAP 

.MEMORY.FULL, ...- 

TELL SWITCH TO PREFORM SCHEOLUING 

INITIAL VALUE FCR PAGECNT 
START AT IDLE 










































SCHEDULE 
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.9 0 77 0 

00771 
.ij n 77 o. 

53130035 
15177776 
n i n n i fi i n 

...D... 

930 

931 

. . QX? . 


TMI 

INI 

ll ip. 

0 0 773 

U JL U J X U X U 

2030000Q 

r. . 

933 

934 

RMP02 

U O r 

LDA 

u 077 4 

0 0 775 
00776 

5 3 7 0 0 00 0 
3600 3324 
03 00 1 010 

P 

p 

...93 5.. 

93 6 
937 


.I AI. 

SCA 

A2J,EQ 

00777 
01000 
n lam. 

20377777 
03301G10 
20377777 

.X.. 

p 

x... 

936 

93 9 

.....q l, n. 


LDA 

AZJ,LT 
in a. 

01002 

01003 

17677777 

03101010 

X 

p 

941 

942 


ANA 

AZJ,NE 

010 0 4 
01005 
01006 

2 0 37 7777 
Q37Q1Q1Q 
47303340 

x. 

p 

p 

943 

944 

945 


LDA 

AG J , LT 
STI 

.01)07 

01010 

T3ir(nnr3i) _ 

02500773 

p 

946' 

947 

....QiiR. 

RMP 04 

SHAQ 

IJD 

01011 

01012 

05500010 

01001016 
,.c/.„7n 7 2 

p 

949 

950 


QSG, S 
UJP 

i ft T 

UiUlO ' 

01014 

01015 

14677777 

00702462 

p 

X 

p 

952 

95 3 


Lux 

ENA 

RTJ 

01016. 

01017 
. 01020 . 

'”"54 TO 3 323 
20101001 

..-03-3-0.1-0-23- 

"p .... 

X 

.p... 

.954. 

955 

...S5~6~. 

’ "RMSDLS'Y " 

EDI 

LDA 

AZJ 4 LT 

01021 

01022 

17601014 

03101046 

X 

p 

95 7 

95 8 


AN* A 

AZJ,NE 

0102 3 

ii 10 c vj 

01023 

14300002 

f 

p 

..95 5. 

98 Q 
961 

RMNOOLAY 

E Q U 

EQU 

£NI 

0102 4. 

01025 
.010 26- 

.0TOTD3TW 

40300000 
.2500-333 6 . 

.p.■.-.-. 

p.. 

."".962. 

963 

..... 9 0,4 . 


"RTJ.. 

STA 

.ldaq.- 

01027 

01030 

45300002 
53100000 


965 

966 


STAG 

TIA 

010 31 
01032 
01033 

36 0 0 Soc 4 
03001052 
20177777 

p 

p 

X 

.. 

96 8 
969 


SGA 

AZJ,EQ 
LDA 

.01034 

01035 

".T7"6"0"0'OT0. 

03101052 

p 

.970'. 

371 

__.. 972 . 


1 M 

AZJ,NE 

.01036. 

U 10 37 

' 5 3 '30 "g o O Q ' 
35077777 

X 

973 
. 974 

T CT 


Til. 

SSA 

.I).l u 4 ti.. 

01041 

4 U u vj 0 iu 0 
010 41 
1460 00 01 

^ ..,., ,.^ ., 

p 

5 f 5 

976 

977 

RMQ0 3 

j 1 A j I 

EQU 

ENA 

.0104 2. 

.0.1043. 

■34003063' 

0 i 0i 4 3 
.14677777. 

p..... 

p 

-X___ 

97 S' 1 

0,7 0 
<1 

......96 Q _ 

RMQ04X 

RAD 

EQU 

ENA _ 

01044 

01045 

01046 

34101017 

01045 

.. n i \ 1 1 ) n is 7 

X 

p 

~p————— 

p 

X 

981 

382 

r, & 7 

SWAPSTRT 

RAD 

EQU 

.. u U f u Q» V v ' 

01346 

14677777 

9 6 4 

9 65 

RMDONE 

EQU 

ENA 

01047. 

01050 
.0105.1. 

'35 0 77777 ' 
40 00 1047 
.0.1.0.0...0.7.3.7... 

.X“. 

X 

.X___ 

9 3 6 
987 

.....9 S 8 . 


"SS7T.” 

STA 

UJP._ 




989 

.991- 

: 992 

993 

J* ' 

* 

* 

- 

LINK R! 




n <r*v r* 



. 0 IQ 5.2 

p_ 

935 

___ 9.9..6..... 

. RttQH2L . 

JEQU. 

01052 

01053 

20003325 

40300000 

l, 7 7fl 7 7 Ql: 

p 

997 

998 

non 


LDA 

ST A 

O -r p 

U 1 U tf 4 

01055 

^ 1 jU 6 6 Cz> 

01001041 

F 

P 

1000 


0 1 I 

UJP 


X U U U 

1Q01 


01056 54303323 P 1003 

01057 77730000 1004 

01060 00792462 P 1005 

01061 01001046 P 1006 



RMTERH 


ILLEGAL WRITE INTERRUPT HANDLER 


Nuyxi. 

-1,X1 

RMP04.—__ 

0,X3+PSA 

.X3+PSA 

PRTYPSA 

RMP04 

S YSCM,X 3+PSA. 

RMP04 

.I-OBOUNQ, X3+PSA 

NK8ITS 
RHP 0 4 

.PA G'E RE Q,X3+PSA 

RHP04 

PAGE AGEj X3+PSA 

2 4. 

R HP 0 2 j X1 

103 

RHSQLAY 

P AGE AGE ,X 3 +PS A 

DELAY 

IOSET 

^RFS¥P7r7XT+FSA”' 

I060UNU,X1+PSA 

.RMNOOLAY.-. 

DELAY 

RMDONE 


REMOVE IDLE 


GET NEXT PSA 


DO NOT DELAY LAST DELAYED USER 


DO NOT DELAY IF IN CONTROL MODE 

EXAMINE ALL TERMINAL DELAY BUS 
DO NOT DELAY I/C BOUND USERS 
GET NUMBER CF PACES USED 
JUMP IF LESS PAGES 

CORE HGG7S PSA TO TEMP. ....... .. 

REMEMBER HIS NUMBER OF PAGES 
JUMP IF MORE USERS 


SKIP IF SOME ONE FOUND 
JUMP IF N CONE TO DELAY 
-GET CORE HOGPS PSA POINTER 
DELAY THE SELECTED USER 


IS THIS USER DESERVING OF... 

A- PAGE-..YES,.IF.NEGATED 

OR IF NOT DELAYED 
FORGET HIM IF DELAYED. 


2 ,X3 

G'ETWEH. 

Q ,X3 

-L-lTE-MPi - 

2,X3 

Xl+PSA 

-PRTYFS-A———' 
RMQ0 7 

UD 8 ITS,Xl+PSA 

TVS'. 

RMQ07 

Yi. . 

BIT 17 
PTSWAPQ 
* 


GET . A FOUR . WORD . BLOCK OF MEMORY 

MAKE IT POINT TO ITSELF. 

. V* 0R02).=—V-M M.PCINTER.. 

(WORDS) = MSA 
(RPSAPTR) TO A. 

TEST' FOR PRIORITY USER.~ 

JUMP IF THE PRIORITY USER 
.CHECK T HE U SER . PRIORITY 

PUT REQUEST IN TOP PRIORITY Q. 


py. T .^^ pRf _ q.. t . 


.QCOUNT-- 

¥ 

-JtSWAXI—-. 

1080UND,XI 

* 

-R-mm-p 

¥■ 

SW3IT 

"FLAGS- 

FLAGS 

.RETURN_ 


INDICATE.ONE 


(RE.SWAP. REQUEST 


GENERATE SWAPBOUND STATUS IN PSA 
START SWAPPING LOGIC (LEVEL ONE) 
ACTIVATE THE SWAPPING'CUEUE 


-V- * ¥ V- V- ¥ ¥ ¥ ¥ ¥ ¥ ¥¥ ¥¥¥¥*¥ ¥¥¥¥ 


QUEST INTO HIGH PRIORITY QUEUE. 


¥ ¥ ¥ ¥¥ ¥ ¥¥¥ ¥¥ ¥ ¥"¥ ¥ ¥¥¥¥¥¥ ¥ ¥ ¥ ¥ ¥¥¥ 


RMSWAPQ 

0 ,X3 

-RMSWAPQ, X 3- 
RMQ0 3 


GET PRIORITY GUEUE POINTER 
LINK THIS REQUEST INTO THE., 
...HIGH PRIORITY-SWAP QUEUE 


RPSAPTR,X3 
A 12/DINT 
IOSET— 
RMDONE 
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S CHE DU LR 


INDIRECT ADDRESSING CHAIN FOLLOWER 


010 62 
01063 
01064 
01065 
01066 

.01067 

01070 
01071 
0107 2 
01073 
01074 

.01075. 

01076 

01077. 

0110 0 
01101 
01102 
01103 
01104 

.oners'- 

01106 


01107 

OHIO 

01111 

,01112 

01113 

01114 

01115. 

01116 

01117 

01120 

01121 


0112 2^ 

-04123. 

01124 
01125 
0 1126 
01127 
01130 

01131. 

01132 
0113 3 
01134 
0113 5 
01136 
01137 
01140 
"OTi'4T" 


"55 00 0 0 00 
20377777 
12 07 7760 
ITWOTOT' 
03101122 
-2-030 40 63- 
12000006 
03301107 
-4f'6-Q"0-O'73" 
05600002 
01001143 
T3¥Q Q¥3F 
20300660 
4-2-0-G-G-0-2-7-* 
0 5 40 0 0 Oil 
00077777 
4460 045 2- 
03401151 
25300662 
"5540 04 0 0 
01300643 


37077777 
12000022 
40301067 
55400000 
'20 70 1111' 
550000CO 
-21301113- 
13000005 
12000022 
40301115 
01001064 


13000030 
-203-0110 6 
05 7Q0 003 
53200000 
05700002 
53100000 
213Q1120 

TS'TO'O'Fil. 

12077766 

4-2-4-7.7 766. 

5304000Q 
21301130 
13 00 0 U 11. 
17477774 
12000017 
4G3G4135 


1010 

4014 

1012 

1013 

1014 

1015 

1016 

1017 . 

1018 
4019 

1021 
10 22 

1023 

1024 
"lUZF 

1026 

40-2-7-. 

1028 
1029 
443*0- 
10 34 
10 3.2.,, 
10 33 
1034 
103-5 - 

1036 

1037 
10 3fi 

1039 

1040 

1042 

-40-4-3. 

10 44 
10 45 
10 4 6 


i u 4 y 
1050 
43 51 
1062 
10 5 3 
10 54 
10 55 
1,0 56 
1 d Si " 


A U O A 
10 62* 
10 63 
10 6 4 
1065' 
10 6 6 
-10 67- 
1068 

106 9 

107 0 
10 71 
10 7 2 
T'O'TX 


+ V V- V-V V V-y-V-V- W V-V- ¥ V- ¥• * V- V-W » 

* J 

-*.«.INDIRECT.ADDRESSING CHAIN FOLLOWER AND FINISHER. J 

* THIS ROUTINE IS ENTERED WHEN AN ILLEGAL WRITE OCCURS J 

-.—..*. UU RING A READ.ADDRESS CYCLE i..TH E ROUTINE SIMULATESTHE ’ 

* HARDWARE EFFECTIVE ADDRESS CALCULATICN BUT ALLOWS THE 

* OPERATION TO PROCEEDE TO COMPLETION WHEN ONLY CNE PAGE OF ; 

"*.THE.USERS.MEMORY.IS RESIDENT.AT.ANY.TIME.. 4 

* THIS ROUTINE RUNS IN PROGRAM STATE (ISR =0). < 




RMCHA'IN '* Vp©——— 
LDA 

RMCHAIN1 SHA 

""AN'S 

AZU,NE 

...... 4434 ,.. 

RMCHAIN2 SHA 


RMINOT 


AZ J, LT 

'ANA. 

ASG 

.UUP.. 

SHAQ 

LDA 

.SHA-- 

ASG,S 

VFD 

ENA. 

AQJ,EQ 

LDAQ 

■W. 

UUP 


A9/RIS 
T3,X3+PSA 
-15 

"4..... 

RMCHAIN4 

.I3 r X3+PSA. 

6 

RMCHAIN3 
7 78 
2 

.RMCHAIN 6 __ 

T4jX 3+PSA 

. __...... 

d 000 0 

A9/JMP,A15/AOS 
5 23 

RMCHAIN 8 
T 5j X 3 + PSA 

A9/ROS. 

T2,X3+PSA 


LOAD THE INTERRUPTED INSTRUCTION, 

LEAVE.THE.INOEXING.BIT'S.. 

JUMP IF THERE IS INOEXING TO DO. 


JUMP IF INDIRECT ADDRESSING, 

■GET THE ■OPCODE. .. 

SKIP IF IT IS NOT A JUMP 


JUMP IF A CFR INSTRUCTION 

.RESTORE... ORIGINAL.(A) ..AND. . (Q). 


PERFORM INDIRECT ADDRESSING 


RMCHAIN3 LPA 
-- ' ' SHA ' 

STA 
V^D 

...L'D'A", I 

VFD 

.-..LDQ.. 

SHAQ 

SHA 


M UU S\C4 J Al 

N8IT23 
48 ' ' ■ ' 

T3,X3+PSA 
A9/ROS 
’T3.X3 + PSA 
A9/RIS 
T3,X3+FSA 
6 

18 

T 3, X 3+PSA" 
RMCHAIN1 


CLEAR THE INDIRECTION BIT. 

PUT THE INSTRUCTION BACK. 

TRY' TQ LGAC THE' I NCICATE O ' ADDRESS 

S I t; U L A T £ 7 H E ■ F - R E GI S T E R ACTIONS. 

GO TO TRY AGAIN. 


r * .PE' 

. M C H A 


ft FORM 1 MSI 
IN4 SHAQ 
..—L-D-A-.- 

QSG 
TIA . 

c 

TIA 

LDQ 

. SHAQ. 

SHA 

. SHQ-. 

AQA 

LDQ 

- - ■ SHAQ'*■ 

ANA j S 
SHA 
STA 


TNT ERR OP Ti 


T 2> X3+PSA 


X 1 

T3»X3+PSA 

'9.~. 

— 9 

T3» X3+PSA 
9 

7 777 4B 


INSTRUCTION. ....'. 

INDEX BITS TO LOW Q. 

LOAD 1X3) • ..- 

GET PROPER INDEX REG. CONTENTS, 


AGAIN LOAD THE INSTRUCTION. 


-SXGN* EXTEND A.AND—Q-.. 

MODIFIED ADDRESS TO A. 


REMOVE INDEX BITS FROM INSTR. 
COMPLETE THE INDEXED INSTRUCTION, 



01142 

01001070 

P 

1074 

....1075... 

UJP 

RMCHAIN2 


O . 

01143 

01144 

n t < t, tr 

20301141 

44300666 

1 /. 477 777 

X 

X 

V 

1076 

1077 

■i ft y a 

RMCHAIN6 LDA 
RMCHAIN7 SWA 

SIT K* A 

T 3> X 3+PSA 

Tlj X3+PSA 

SIMULATE A JUMP INSTRUCTION 

. .ctns tm ..xi jr . rvr-.-r i > n x* .a n nnr..r.r.. 

ex _ 

U 11 Hr J 

01146 

01147 

14-07/ (if 

40301143 

25301104 

A 

X 

X 

1 U / a 

10 7 9 
1080 

t h A 

STA 

LDAQ 

/ H ^ \ 1 r 

13^X3 +PS A 

T 5j X3+PSA 

tN 1 tK me RETURN AUUKESS 

STORE THIS JMP XNSKIP. 

LOAD ORIGINAL (A) AND (Q). 


0115 0 

01301123 

.X. 

...10 81. 

1082 

.....1083 . 

...:....ujp.......~ 

T HIS W AS A C PR 

T2sX3+PSA.... 

INSTRUCTION. 


o°. 

01151 

01152 

0 i i cr 7 

25301147 

55400000 

n o 7 ;i 11/4, 

X 

V.. 

1084 

1085 

4 , A H ft £ , 

RMCHAINS LDAQ 

VFD 

POD T 

T5» X3 + PSA 

A 9/RQS 

T. 7? V 7 xO C A 

LOAD THE A ANG G REGISTERS 

., TD v/ T Li C TKiCTOl PTTAM A PA TM , , .., . , „ . 


U 414 J 

01154 

O c ( Xi ±1 n o 
01001162 

A . 

P 

. lUoc .. 

1087 

Or K ? 1 

UJP 

) v^9AO*roA 

RMCHAIN9 

IKY ( Ht inb 1 Kwt I 1oN AbArN« 


o .... : .. : .T...*$. : .. . :.1 












































H w)OLITJLL.I\/ OJJ 


U«'J u XJ / c. X / f H CCV' 


r M ol 


XO 


O U fTC UUL5 


x n u x fCd vJ » m u u tvcra o x ino o n h x in ruu.o«c.r\ 


O 


o 


o 


o 


u 


01176 
01177 
0120 0 
01201 
01202 
01203 
0120 4 
01205 
. 0 . 120 . 6 . 
01207 
01210 
01211 
01212 


12009003 
13 0 77.766. 
17677777 
40 301172 
55400900' ' 
20701.200 
55 00 Q000 

.1'TOO'SWS. 

12 0.0 0001 

-—.12-40-0-0-8-1 . 

13000002 
12 00 00 1.7 

.40301202. 

01001173 


w 

0 1155 

01 0 U 116 0 

P 

1068 

UJP 

*4-3 



0115 6 
01157 

..0-116 0 

01161 
0116 2 

01163.. 

01164 

..01165. 

14600003 
01001163 
.4 n 0 ti 0 0 2 . 

P 

1089 

109 0 

.iOP i.. 

ENA 

UJP 

....PM A. 

3 

* 4-4 

.2. 


Cl 

01001163 

14600001 

P 

1092 

1093 

UJP 

RHCHAIN9 ENA 

* +2 

1 


Q 

55 00 0 01) 0 
21301144 
12 40 0 011 

X 

109 4 

1095 

109 6 

VFD 

LOQ 

SHQ 

Ag/pis 
Tl,X3+PSA 

9 

LOAD THE ORIGINAL P.C. 


0116 6 
01167 

....0117 0— 

12477766. 

53040000 
.01.00-1144- 

p.. ■... 

1097 

1098 

.10 9-9__ 

.- SHQ 

AQA 

..UJP-..... 

-9 

..fi.MCH-A-TN.7-.... 

EXTEND THE SIGN. 

ADVANCE THE P.C. APPROPRIATELY. 

O ' 

•.••• • .• • .•/ v.-... n 4 

U U w JU JL “ “ 

rr v , rrr.,.., rv, n. ? ,.Av rw • 


1100 

1101 

** CONTINUATIONS 

A PAGE HAD BEEN 

MISSING FOR A RADR, WITH LDI OR STI. 

O . 

011/1 
01172 
01173 

-~6 5 00 0000 
20301153 
12000005 

X 

__— 3rXQ-2 - 

±10 3 

1104 

RMINuR VFD 

LDA 

. RMI N LOOP. SH A .... 

....A9/RIS 

T 3 > X 3 +PSA 

6 

LOAD THE INTERRUPTED INSTRUCTION. 

INDIRECTION 3IT TO HIGH A. 


......0T1T4. 

0 3 2010 72 

~F. 

1105 

AZJ j GE 

RHINDT .—. 

... “TJUHP. IF . NX INDIRECT . ADDRESSING. . . 


110 6 
-116-7- 
110 8 

110 9 
1110 
ill! 
1112 

TUT 

1114 

Xli-5. 

1116 

1117 

111 3" 
1119 


SHA 
-SHAQ— 
AM A 
ST A 
VFD 
LDA, I 
VFO 

hfwit - 

SHA 
-SMQ- 
3HAQ 
SHA 

-STA. 

. UJP 


_=_9.____ 

777778 

T3,X3+PSA 

A9/R0S. 

T3» X3+PSA 

A9/RIS 

-*------ 

o 

1 
1 

2 

15 

“T"3tX"3"+-PS“A-- 
RMINLOOP . 


STORE THE AOORESS ONLY. 

TRY TO GET THE WORD POINTED TO. 


WIGTWAT.OF.CTJCTE.TO.COW.17 

NEW INDIRECT SIT TO LOW A. 

ORIGIN A L ’ IN C E X BITS TO L0W A. 
NEW AOORESS AROUND INTO PLACE. 
STORE MODIFIED INSTRUCTION. 

GO TO TRY AGAIN. 


,(B 

°<3 

,o 

9 

o 

o 

6 

o 

O l 

IkJ 

I. 

o 

o 

o 


.. z I 
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USER INTERRUPT SIMULATOR 





1123 

....11-2-4. 

**¥*•¥••*• ¥ * •** * * * * * * ^^^^2444 4 4.4 4 4 44 4 44 44 4 4 4 if. 444 4 * 4 4 4 * 4 4# 4 4 $ 4 ^$ 4 4 4.4 

4 4 

. 4 . THTS SFCTTON PPOnFSSFS USFP APTTHMFTTP AND PCD FAU1 TS .... * . 


0? 




1125 

4 * 

44 44 4 444 44 444444 44 4 4 4 4.4 44444444444444444 44 44444444444444444444444444444444 


o 

01213 

01214 

1470 0010 
14477377 


.112'7. 

1128 

1129 

INF PF 

enq 

ENA,S 

FPFLOC 
- FPF 



.01215 

01216 
. .. U 1217 

01001226 
14700002 
14473777 

p.;. 

113 0' 
1131 

.1132. 

IN8CD 

UJP 
ENQ 
ENA, S 

. .RMININT.... : ..... . 

8CQL0C 

.- BCD .. . .... 


o 

01220 

01221 

01001226 
14700004 

p 

1133 

1134 

INQVF 

UJP'" 

ENQ 

RMININT 

DVFLOC 


o. 

U 122 2 

01223 

01224 

.144/b 7// 

01031226 

14700006 

p 

..j~j.~3.5-.. 

1136 

1137 

INAOV 

ENA > S 

UJP 

ENQ 

RMININT 

AOVLOG 



01225 
01226 
......01227 

.."1447 67 7 7 

54303323 

.34 3 0 0 67 ft 

p 

.x...... 

1138 

1139 

...1 i 4 n . 

RMININT 

.ENA,S 

LOI 

.~..o.fln_ 

- AOV 

RPSA.PTR»X3 

.TS. X7 + PSA.p! FAP IFF . F ft t s 1 T STT......... 


O ' 

o . 

01230 

01231 

.0123 2- 

01233 

01234 

41301164 

25003316 

-“66-34-0646- 

45301211 

20300635 

X 

p 

~x———— 

X 

X 

1141 

1142 

——Ti^FS— 

1144 

1145 

——™— 

ST Q 
LDAQ 

-~SS-A“ 

STAQ 
LD A 

I1.X3+PSA REMEMBER LOW-CORE FAULT ENTRY LOG 

R MIN CON 

—--“^srx^PST*. '. • . 

T 3,X3+PSA 

PC* X3+PSA 


01235 
01236 
...01237- 

.x307776TT 

77674000 
. 13 0 77776- 


i'i’46 

1147 

...1.1.4.A—. 


.SPT 

ISA 

SHAQ 

<•1 


o 

01240 

01241 

20300646 
12000005 

X 

1149 

1150 


LD A 
SHA 

C Rj X3+PSA 

5 


o . 

0 1242 
01243 
01244 

1 7 6 0 8 2 C 0 
16600200 
13077767 


.. 1151" 

1152 

1153 


..ANA. 

XQ A 
SHAQ 

002008 

002008 CONVERT THE RGS SIT TO A RIS 3IT 

-S 



.01245' 

01246 
___0424 7 

4130 1 i 5 Q 
20 301227 
.3..Z.Q..Q..0..6.6-3- 

X 

X 

X...:. 

'" 1154. 

1155 

__ 115 6. 


S f C$ 

LDA 

4 oft 

.r27X'3+PSS... ; . : .... 

IS,X3+PSA 

.B P10RB2-2-. ■. s A\iE INTFRUPT MASK SITS . 


o 

01250 

01251 

.....,o ..-.a. o r o.-.~ 

77664000 

34301230 

X 

‘■to Jfc» 

1157 

1158 


AIS 

RAO 

ZERO THE" ISR. * 

T1,X3+PSA SAVE THE BITS IN Tl. 


O'. 

0125 2 
0125 3 
01254 

164/7 (ff 
34301246 
14600086 

X 

.l'±'5'9"*' 

1160 

1161 


X 0 A f 3 

RAO 

ENA 

7 7/ 77 B 

IS* X3+PSA .REMOVE THE BITS FROM IS. 

PS/1.6 



01255 
01256 
____Q1-25 7 

.77660 0 30 

1.4 60 1261 
..40 301234 

p 

„x.... 

.1162 

1163 

..4.444_ 


AOS 

ENA 

ST A. 

RMRTJ 

.PC* X^-fPSA.............. 


o 

01260 

.01001351 

X 

1165 

1166 


UJP 

RETURN 


o , 




116 / 
116 8 
1169 

* 

4 ' 

"'TH'I S~ 
THIS 

COOL SlQKtL THu Rti UkN AuOREbS iMO fH_ USERS CORE. 

ROUTINE RUNS IN PROGRAM STATE WITH ZERO IN THE ISR. 



.01261 

01262 
.. 0126 3. 

.'55"06'0'"0T0“ 

54303323 
..-.45-3-0-1-15-1- 

p 

.... 

117 0 
1171 

.. 1172. 

R - MRTT -. 

~WU .~' 

LOI 

STAQ 

.'A97RIS...... .............. : .. : 

RPSAPTR * X3 

__:r5,X-X.+.p.S-A_-_ SAVE THE ORIGINAL-- iA} -AN-0.fQ) ....... 


O ' 

01264 

01265 

y-nf.1ii^Trn-itrimTTn]iiiWT)r-f^--r4T-Oi<rm---7LTTiin 

25301251 
537Q0000 

, £z c 2 , f n n o 

X 

1173 

1174 

1 1 7 C. . 


LDAQ 

TAI 

Tl,X3+PSA 

X3 ■■ 

. ti i"\ i t\ €'■ 


o. 

U i^OD 

01267 

01270 

5? 3 H L -J U V u 

4130 0 Q 00 
55000000 


l 1 f tr 

117 6 

117 / 


WTJ 

STQ 

VFO 

A "i/'rvu5 

0,X3 STORE INTO USER7S LOW CORE. 

_A.9/RIS ._ ; ..___.__:._______:..... 



0127 1 
01272 
....0-127-3. 

5 4 3 O'33 23 

2 5 30.12 63 
.0..13 012 33-. 

. p ..■. 

X 

....x.. : _ 

....XT7T.. 

117 9 

... llgQ_ 


LU 1 ■ 
LDAQ 

UJP ■ 

RPSAPTR,X3 

T5,X3+PSA RESTORE ORIGINAL (A) AND (G) . 

. T3 , X 3+PSA .- .-.- - - . ■ ____ 


a 1 " 









o 


O' 

.7 w 

a . 







• v. .. ........ ...... . ; 



o 


o 

















































:mbler/os3 


0127 4 
01275 
01276 
U 127 7 

Tunrir 

01301 
01302 
01303 
01304 
013 0 5 
01306 
01307 
01310 
01311 

.01312. 

01313 

01314 
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1184 

1185 

1186 
118 7 
118 8 

1189 

1190 

.1191 

1192 

-4493 

1194 

1195 

1196 

1197 

1198 

1199 
120 0 


SCHE DU LR 


USERS VMM MODIFICATION 


21077777 X 
-44-00'3-Q-5"7“P" 
47103055 P 
47303056 P 

T¥6DW0IJ. 

0520 0040 

.77 644140 . 

53300000 
5364 0 Q 00 
“2 0 200'74±"“X“ 
41201305 X 
03303055 P 
"2X0 0 0 752 "X 
77730000 

-0 3 7.04315 .P. 

00 70 3066 P 
01003055 P 


1202 
120 3. 
120 4 
120 5 
1206 
"42 tT7~ 
1208 
-4.2.0-S-. 
1210 
1211 
±242- 

1213 

1214 
“4 2415" 

1216 
-424.X 
1218 
1219 
122 0- 


• 4f-¥ V* •* AM?- V* •*-fMMMf. * V # *••*¥••»****¥*-<?•*-*¥■****** 

V- 

. CALL MEMSET WITH :..-—..— - - -.- * 

(A) = RETURN ADDRESS ' * 

(Q) = NEW VMM WORD * 

-. —.-. * 

(X3) = PSA POINTER. * 

XI AND X3 ARE NOT CHANGED * 

.MEMSET SETS.THE.APPROPRIATE PAGE" INDEX FILE.ENTRY TO NOT-AVAILABLE * 

AND REPLACES THE OLD VMM WORD IN THE PSA WITH THE NEW. * 

THEN,.IF.-THE - OLD P-AGE.(AS.-INDICATED BY THE.VMM WORD). WAS* --* 

(1) PURE, THEN EXIT IMMEDIATELY? * 

(2) IMPURE AND ON BACKUP STORAGE, THEN FREE THE FOUR BLOCKS? * 

—(3) IMPURE.ANG IN CORE, THEN SET THE PAGETABL ENTRY TO ZERO. * 

IF A PHYSICAL MEMORY PAGE IS FREEED, THE SWAPPER WILL * 

“ BE C AL L ED ...' ". .~.* 


ZEROPG 

-MEMSET'' 


IA i 

LDA 

STQ 

AZJ,LT 

' LO'Q. 

VFD 

.AQ J , LT- 

RTJ 

UUP 


ZROPAGE 
“SWAP PC'" — 
S WAP X1,XI 
SWAPX3, X3 

■Tnnnra -7 . 

408, X2 

.PS+PEW,X2 

X3+PSA 
X 2 

VMMtXZ 
VMM,X2 
SWAP EXIT 

"FIT 22. 

A12/DINT 

-MEMSET. 03-. 

FR8KPAGE 
SWAPEXIT 




SA VE.RETURN ADD re 5S——— 

SAVE XI 
SAVE X3 

ILLEGAL.PAGE.TO.REFFERENCE. 

SKIP IF NOT IN THE PAGE FILE 

MA KE.PAGE.ILLEG AL.TO.REFFERENCE- 

MAKE POINTER TO USER*S VMM WORD 

GET' THE' OLD PAGE' ACCESS WORD'- 

SET THE NEW ONE. 

JUMP IF THE OLD PAGE WAS PURE 


JUMP-.IF.T-HE.PAGE.IS.IN.CORE 

RETURN 


O.:. 

01315 

01315 

17600177 

P 

1221 

1222 

MEMSET03 

EGU 

ANA 

♦ 

177B 

THE PAGE OCCUPIES PHYSICAL CORE 

REMOVE PROTECTION BIT 

.o 


0 1316 
01317 

.01320. 

53 50 0 0 00 
2010 07 0 0 
.00.7.13.-0-6.6. 

X 

...P._. 

1223 

1224 

.1 2Z5 . 


.TIT. 

LOA 

-RT J.-. 

.xi.. 

PAGEHSAjXl 
.FRBKPAGE. 

GET THE MASS STORAGE ADDRESS 


o. 

01321 

01321 

14600000 

P 

V 

i226 

122 7 

GIVEPAGE 

EQU 

ENA 

* 

0 


o 

O _ 

01323 

01324 

H 0 i tl D 0 5 f 

.40101317 

14600001 

A.' . 

X 

let O 

1229 

1230 


h i A 

STA 

ENA 

P Abel "AtoL j XI 
PAGEMSA,XI 
i 

.btiJ 'I Hfc.PAbt:.10.liN-Ubbu 

REMOVE EXTRANIOUS MASS STORAGE AO 

.X._.._ o 

. 

.01325. 

G1326 

_.:.0.4.32.7-.... 

“X4r0TT3335“ 
20 003360 
.Q4.0.Q.3 0.6.3. 

~F." 

P 

P___ 

12 31 
.12 32 

..-.12-3.3. 


RAD 

LDA 

.....IMP.__ 

FPCHT .-. 

S WAPNUM8 

_.SW.APER9.8___ 

... INDICATE.S NOT HER.FREE.PAGE... 

NUMBER OF SWAPS IN PROGRESS 

.■. /"*X 


o 



















































CD 




3 


O 


o 


o 
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S CHE DU LR 


LEAST VALUABLE PAGE SELECTION 


O 

O 

O 

O 

q ; 

o 




O 

o 6 

o 5 


01334 

"0±3^‘5~ 


24077777 
40i}'0 33'40" 


01352 17377&00 


01353 

01354 

01355 

-01356. 

01357 

01360 

-{Tl-36-t- 

01362 

01363 

01364 

01365 

01366 

01367 

01370 

01371 

01372 


20 301044 X 
.03301362. 


17401002 
-03 0-0-1362- 
17601021 
03101402 
15 5 6616*7 
20003340 
03701366 
4T003340' 
47103341 
.0-25-04-340- 

54103341 
013 7 G 
77730000 
2 0101340 
5 4T0^0"O5G' 


X 

-P- 

X 

P 

P 

P 

P 

P 


1237 
123 8 

1239 

1240 

1241 

1242 

1243 

1244 

1245 

1246 . 

1247 

1248 


* 

.*_...... 


* 

* 

* 

* 

.# 

* 

* 


THIS ROUTINE- FINDS -THE LEAST VALUABLE PAGE. 

THE ROUTINE MAY BE CALLED WITH THE INTERRUPTS CN, BUT 

MUST.ALWAYS BE.CALLED ON.LEVEL ONE........ 

INTERRUPTS WILL BE OFF CN RETURNING. 

ENTER WITH THE RETURN ADDRESS IN INDEX X2. 


THE 

LEFT 


v- 

* 


LEAST VALUABLE PAGE NUMBER WILL BE 
IN LOWVALPN.AND XI.—IF NOPAGE WAS.FREE,.LOWVALPN 


WILL BE ZERO. 


01330 

47203342 

P 

1250 

1251 

PAGEVALU STI 

PVALEXIT,X2 SAVE RETURN ADDRESS 


-01331 

■ 01331 
.53-0-2-0 3 36 - 

P 

12 52 
1253 

-.12-54. 

PVAL08 EQU 

— --LEVELG— 




1255 

1256 
2 5 7” 


LG A 
STA 


BIT23 
P AGEAGE" 


o 

01336 

47003341 

P 



1258 

1259 


. STI 

LOWVALPN,0 


.0133 7. 

fll 34fi 

"14177777 

PHI fi 1 IP? 

'X.~ 

X 



126 0'' 

1261 

iPftP 

P W A | in 

ENI 

i n & .. 

N PAGESMi,XI 

P AGPTARS -. x 1 

O ... 

01341 

01342 

03301366 

53700000 

p 



..•it-fc-w-fi.—...-. 

1263 

1264 


AZJ,LT 

TAI 

PVAL14 

X 3 

o , 

0 i o4o 
01344 
01345 

. ±2'QTtt52~ 

2110 0 736 
53600009 

X 



42 65"" 
1266 

1267 


S H A 

LDQ 

TAI 

3 —2 4 

PAGETIME,XI 
X 2 


.01346 

. 01347 

.01201347. 

n inn i loo . 

"p. 

...p. 



~~IZET~ 

1269 

127 0 


.ujp... 

it IP 

.*+T7X2.. 

_BMLtfi _ 

O . 

01350 

01351 

01001375 

15500QQ0 

p 



-- JL w f .U. — . 

1271 

1272 


- —U f -- 

UJP 

INCUS 

PVAL16 

0 


INITIAL VALUE FOR PAGEAGE 
INITIAL VALUE FOR LOW VAL P N 


WHSI'R.'OF. wm ES MIN US ■ ONE. 

GE T.THE- P AGET A8L ENTRY--—.— 

JUMP TF 'sY^T'l* pace 

SAVE LOCATION OF PAGE ACCESS WORD 

"GET UPPER OCTAL DIGIT.——™ 

GET PAGE AGE 


-1273" 

1274 

127 5 

1276 

1277 
.12-7-8- 

1279 

1280 
-1-281“ 

1282 

1283 

128 4 
1285 

.-124-6- 

1287 

1288 
1239 

1290 

1291 


PVAL12 


"AN1— 

LOA 

Azj,i:r 
ANA, S 
-AZJ-t-EQ- 
ANA 

AZJ,NE 
IN Q, S 
LOA 

AQJ,LT 


-P-V-AL-1-4- 

~p-V'A1r±5" 


“ST’Q" 
ST I 

LDI 
"EStF 
VFO 
LDA 
TSE. 


.7760 0Bj»X3 

I080UND,X3+PSA 

P VALi2. 

NKBITS 

--P-VAL1-2..- 

DELAY 
PVAL 2 0 
-“5W0~ 

PAGEAGE 
PVAL14 

"PAG'EIGE . 

LOWVALPN,XI 


.JUMP.DECODE.ON.OFFER.OCTAL.DIGIT 


-0.=■.UNUSED.PAGE.—.-. 

1 = SYSTEM PURE PAGE 

2 = USER PURE PAGE 

3 -'USES IMPURE PAGE . 

X3 IS PSA POINTER 

A IS PAGE OWNER/S STATUS 

' J U M P “ I F' "N EGA T £ Q.( ACTIVE }. 

EXAMIN TERMINAL WAIT BITS 
JUMP.IF.NOT.TERMINAL.WAIT 


■ C O R E.I Sr N O T.ACTIV £,.- 5“S'E C O NO S 

GET PREVIOUS OLDEST PAGE DATE 
JUMP IF THIS PAGE IS NOT OLDER 

"SAVE.DATE.OF" XOW-VAOJE.PAGE. 

SAVE NUMBER OF LOW-VALUE PAGE 
-EXAMINE.NEXT-.PAGE-.. 


LOWVALPN,XI 

*———-— 

A12/DINT 
P AGE T ABL,XI 
07 XI.. 


IF.NO PAGE FOUND 


01373 

03301331 

P 

1293 

1294 


AZJ,LT 

PVAL03 

SINCE THE INTERRUPTS WERE ON, 

.A -PA G E MAY- H A V £ B EEN STO LEN FO R.- 





1295 




FOR FREE STORAGE'EXPANTiON. 


01374 

01002342 

P ' 

1296 

.— 1297.- 

1293 


UJP 

PVALEXIT 



01375 

20 003335 

p 

PVAL16 

LDA 

FRONT 

SYSTEM PURE CODE PAGE IF HERE 


01376 

03301366 

P 

1299 


AZJ,LT 

P VAL 14 

JUMP IF NCI ENOUGH PURE PAGES 


.. 01377. 

.QT0GI362 

P~. 

.13 0 0... 

1301 


jjjpr- - 

PYAET2 



01400 

2 0 00 333b 

p 

130 2 

. PVAL18 

( n a 

.F.PCNT. ____ 

..POUND.A.FREE.RAGE.-IF.HERE..-.. 


01401 

03301366 

P 

1303 


AZJ,LT 

PVAL14 

JUMP IF FREE PAGE NEEDED 


01402 

01403 

47103341 

Q1001370 

P 

-P-—- 

1304 

———i-3-0-5---— 

PVAL20 

STI 

—UJP 

LOWVALPN,XI 

—F-VAt±5————- 

FOUND FREE PAGE 
———0ONE«“EXTT~ 



o 


# v l it* & 
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SCHEDULR 


SWAP PROCESSOR 


130 9 
-4340 
1311 
1212 

1313 

1314 

1315 

1316 

1317 
4348 

1319 

1320 

1321 

1322 

1323 
TTZAT 

132 5 
4,-3 2-6- 
132 7 

1328 

1329 

1330 

1331 
.1332“' 

1333 


13 3 6 
13 37 ' 


.xtse. 

1357 
.13 SS- 
IS 59 

1360 

1361 
13 6 2 
1363 

. T"3'g'4. 

13 65 
.X.3-6.B . 

1367 

1368 
1369' 

1370 

1371 


¥ 

¥ 

.¥. 

¥ 

¥ 

¥ 

¥ 

.¥. 

¥ 


¥ 

¥ 


¥ 

¥ 

.¥. 

¥ 

¥ 

¥ 

¥ 

Hh 


1338 

¥ 

1339 

¥ 

.1340. 

..¥. 

1341 

¥ 

... 4 . 3 . 42 --. - 

¥ 

1343 

¥ 

1344 

¥ 

'1345 

¥ 

1345 

¥ 

134 7 

¥ 

134(3' 

.¥. 

13 49 

¥ 

. 43.5.0. 

.¥.. 

1351 

¥ 

1352 

¥ 

....... 


. .. Tf**. . 

1354 


1355 

¥ 


.¥. 

¥ 

. ¥ . 

¥ 

¥ 

.'¥«"■■ 


¥ 

.¥. 

¥ 

¥ 

¥ 

¥ 


¥ ¥ ¥¥ ¥ ¥ ¥ ¥ ¥¥ ¥¥¥¥¥¥¥¥¥¥¥ ¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥ 
¥ 

,¥ . l I _ „ „ . . .. ■. 

¥ 

¥ 

- ¥ .• 

¥ 


PAGETABL ENTRIES 

THEPAGETABL CONSISTS OF A ONEWORD ENTRYFOR EACH 
PHYSICAL MEMORY PAGE ( 2 046 WORDS). EACH ENTRY DESCRIBES 
THE USE OF THE CORESPONDING PAGE CF MEMORY« 


0000 0000 THE PAGE IS NOT USED 


100X XXXX THE PAGE IS A SYSTEM PURE PAGE WITH MEMORY 

PROTECTION SO THAT MORE THAN ONE USER MAY BE 
USING THE PAGE FOR MEMORY. XXXXX POINTS TO “AN 
ENTRY IN LIBTAB WHICH CONTAINS A PAGE ACCESS 
..WORD,.. 

200 X XXXX THE PAGE IS A USER PURE PAGE WITH NO MEMORY 

.PROTECTION..X-X-X.XX.IS.A.POINTER.TO.THE.USERS.# 

VIRTUAL MEMORY ENTRY (ALSO A PAGE ACCESS WORD)< 

THE "PAGE.IS. A USER-IMPURE 'PAGE' WITH "A'"FORMAT- 

THE SAME AS FOR 20 0X XXXX. 


¥¥¥ 

¥ 

.. ¥. 

¥ 

¥ 

*'-*■■'¥ ■ 

¥ 

¥ 

.¥. 

¥ 

. ¥ . 

¥ 

¥ 

■—MM 

¥ 

¥ 

.¥. 

¥ 

.¥. 


.¥tnro. warn .system.face. murKmxm .etthep resident.programs or 

RESIDENT LINKED LIST (FREE STORAGE). ALSO USED 
.WREN THE- PA GE IS B E-I-NG S-W-A-P-PED EITHER IN 0 R OUT... 


40 0 X XXXX XXXXX IS A POINTER TO THE FIRST OF FOUR 4-WORD 
F. C. LIST ENTRIES. THE PAGE IS USEO AS FOUR 
■ FILE-CORE BLOCKS (512 WORD I/O BUFFERS) WHICH 
ARE DESCRIBED SY THE 4 F. C. LIST ENTRIES. 


.VIRTUAL ME M 0 RY M AP (V N M ) . , .. . : .. 

EACH USER HAS A VIRTUAL MEMORY HAP IN HIS PROGRAM STATUS 
AREA (PSA). EACH USERS VMM CONTAINS 32 1-WCRC ENTRIES. 
EACH ENTRY DESCRIBES THE PHYSICAL LOCATION Cf ONE PAGE 
(2048 WORDS) OF MEMORY. THE ENTRIES HAVE THE FOLLOWING 

FORMS'.,.... 

•QG40.0-XXX. THE- PAGE IS IN PHYSICAL- CORE. IT IS A PRIVATE 

ALTERED PAGE WITH NO MEMORY PROTECTION. 

XXX IS THE PHYSICAL CORE PAGE NUMBER. 

0000 1XXX THE PAGE IS IN PHYSICAL CORE. IT,IS A PRIVATE 

UNALTERED PAG! WITH TEMPORARY MEMORY PROTECTION, 
.XX X.IS.THE. FTnrSTCTAX .CORE P ACE NUM S E R . . 

2000 -0-000 THE PAGE IS A- Z-EROPAGE. - ThE PAGE DOES NOT. 

OCCUPY PHYSICAL MEMORY OR MASS STORAGE. 

IF THESE ADDRESSES ARE REF F ERENCEC BY A USER , 

■ ' A PAGE CONTAINING ZEROS WILL BE GIVEN TO 
THE USER, 


¥ 

¥ 

-■¥- 

¥ 

¥ 

¥' 

¥ 

.¥. 

¥ 

¥ 

¥ 

¥ 

¥ 

'"¥. 

¥ 

.¥. 

¥ 

¥ 

¥ 

¥ 

.¥. 

¥ 

.¥. 

¥ 

¥ 

¥ 

¥ 


"'ZXXX'.X'"XXX . THE .PAGE IS' IN.. HA'S'" 

MASS STORAGE FILE ! 


S STORAGE. .XXXXXXX.IS.THE. 

3LOCK ADDRESS, 


3XXX XXXX THE PAGE IS IN MASS STORAGE MEMORY, HOWEVER, A 
PARITY ERROR OCCURED WHILE MOVING THE PAGE, 

40 0 X XXXX THE PAGE IS A PURE CODE PAGE WITH MEM CRY 


.¥. 

¥ 

.¥. 

¥ 

¥ 

¥ 

¥ 

¥ 

.¥.. 

•'¥ 

.¥. 

¥ 

¥ 

¥ 

¥ 


1375 
13 76 
13 17 
1378 

137 9 

*T3*8*D . 

1381 

1382. 

1383 

1384 

138 5 
1386 


¥ 

¥ 

¥ 

¥ 

“•¥. 

¥ 

¥ 

' ¥. 

¥ 

¥ 


-PAGE- ACCESS 'WORD 


THE PAGE ACCESS WORD IS USUALLY AN ENTRY IN THE USERS 

""VIRTUAL'.MEMORY...HOWEVER",.SYSTEM.FORE.CEDE'.PAGES.HAVE. 

PAGE ACCESS WORDS THAT RESIDE IN LI3TA8 AND HAVE A SLIGHTLY 

DIFFERENT.FORMAT*.THESE.PAGE.ACCESS.WORDS.ARE POINTED. 

TO WITH 4 0 0 X XXXX ENTRIES IN THE USERS VMM. 

QOO0 1XXX THE PAGE IS IN PHYSIGAL CORE (AS WELL AS ON MASS 
STORAGE) AND HAS THE PAGE ADDRESS OF XXX, 


¥ 

¥ 

¥ 

¥ 

.¥ 

¥ 

..¥. 

¥. 

¥ 

¥ 

¥ 




...., c: 


. T37Z 

¥ 

.....THE.PAG E.F OR.MEMORY.. 

THE XXXXX. 

IS.A.POINTER. 

...¥..... 


137 3 

¥ 

WHICH POINTS TO A TWO 

WORD PAIR 

(PAGE ACCESS 

¥ 


...........4.3X4. 

¥ 

..WORD).IN-.LLBXAfi.... 



¥ 



O 
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o 
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SCHE DU LR 


SWAP PROCESSOR 


01404 

01405. 

01406 

01407 

01410 

01411 

01412 

.0 141 a 

01414 

0141-5 

01416 

01417 

0142-0- 

01421 

01422 

01423 
-0-142-4.. 
01425 
01426 
01427 
0143 0 
01431 
0143 2’ 
01433 

.0-1434- 

01435 
01436 
0143 7 
01440 

”01441' 

01442 

.0-1443. 

01444 

01445 

01446 

01447 


.01404.P 

77740 000 
..1420140-7 P 
01001330 P 
54203341 P 
05 20 0 0 01— 
01003055 P 
14600001 
' 3 4 0 0 3 0 6 0 ”' P 
53200000 

..00-7-0-3251.P- 

20201371 X 
53700000 
“12 0 7 7752 
53500000 
0 110142 3 P 

01001473 P 
-01001470- P- 
01001470 P 
14300002 
'0 0 70 310 4' P* 
25001466 P 
45300000 

”'5'3"'2Q"0"0! 0”0. 

21201416 X 

.45-3-0-0.0 32- . 

1530 0031 
20201323 X 
21003320 P 
Q36G1450 P 

'54103343 P 


10177 777 
14 00 G 0 00 
47103343 
15177777 
■14*20-0004 
00 777777 


1400 
4401 
1402 
140 3 
140 4 

140 6 
.14 0 7 

1408 

1409 

1410 

1411 

1412 

1413 

1414 

T4l"5" 

1415 
-141-7- 

1418 

1419 
- 14 - 20 " 

1421 

1422 
T423”' 
1424 

.-14-2-5- 
142 6 
142 7 
142 6 

142 9 

143 0 
TWST 

1432 

-14-3-3- 

1434 

1435 

1436 
143? 

143 £ 
T'43'9' 

1440 

■ 1-4.41 . 

1442 
14 43 

144 4 
1445 


. '''jjjt." jy.'J5J6.^ . 

J r *V* 

* ..-.HERE.A.PAGE.IS.MADE.AVAILABLE INORDER.TO.PROCESS ...-.* 

'* AN ITEM IN THE SWAP QUEUE. IF NECESSARY, TEE * 

* PAGE WILL BE SWAPPED OUT TO THE DISK. * 

¥ —•* .—•. ..~ ——~ ....• * 

*■¥■*•* ■¥ ***** -V- **■¥•*■* WV--V VW Z ■# *• VV 


SWA PERI 0.EQU 

VFO 

.ENI 

UJP 

LDI 

•. .. ISG 

UJP 
ENA 

.RAD" 

TIA 

.RTJ- 

LDA 
TAI 
*— S - H *A 
TAI 
UJP 


UJP 

-UJP .- 

UJP 

ENI 

RTJ . 

LDAQ 

STAG 

TIA' . 

LDQ 

-ST-A-Q-. 

INI 
LDA 
■LOU 
AQJ,GE 

TOT. 

IS I - 

-HOP.-. 

3TI 

INI 

ENi 

RTJ 


A12/EINT 
..*.±.2 T X2- 
PAGEVALU 
LOWVALPN,X2 
1YX2 

SWAPEXIT 

1 

SHAPNUMB 
X 2. 

-P AGEZ-AP 
PAGETABL, X2 
X 3 

3-24 . 

v 1 

*±l.i.Xl 

SWAPER32 

-SWA PER 30.. 

SWAPER30 
2 ,X3 

SETMEM . 

S WAPRTN1 
0 ,X3 

X 2..... 

PAGETABL,X2 

-2-,-X3 .-... 

1, X 3 

PAGEMSA,X2 
LI8LAD 
S WAPER16, 

’l 5W AP UNT , XI 
NSWA PUNT,XI ' 

L SWA punt', xi 

F SWA PUNT,XI 
■ F BPP , X2 
G ET 3 LK 


FIND LEAST VALUABLE PAGE 
GET LOW VALUE PAGE NUMBER 
SKIP IF A PAGE FOUND .. 


ONE.MORE REQUEST.IN PROCESS 

KIL-L- T HE PA GE IF G U RRE-NTLY U S ED 

GET THE PAGETA8L ENTRY 
PAGE ACCESS WORD LOCATION 

GET UPPER OCTAL DIGIT.. 

SET UP FOR JUMP DECODE TABLE 
JUMP CECCDE 


0 = UN-USED PAGE 

1 .=.SYSTEM PURE PAGE . 

2 = USER UNALTERED PAGE 

3 = USER IMPURE PAGE 

WET 4 WORD BLOCK.*.... 

SET UP TO WRITE OUT PAGE 
RETURN LINKAGE FROM DISKCOP 

PAGE"NUMBER . 

VMM ADDRESS 

COMPLETION "AOORESS IN ’X3. 

GET THE MASS STORAGE ADDRESS 

JUMP IF DISK ADDRESS IN A 

GET.0”ST””SWS'pliNTT... 

NUMBER CF SWAP UNITS MINUS ONE 


ADD FIRST SWAP UNIT NUMBER 
ASK FOR A PAGE - ■ 
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o 

o 

o 

o 

o 

o 

o 
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SWAP PROCESSOR 









144 7 
1448 

...1 LlU-Q .. 

* MASS 

* X3 IS 

STORAGE ADDRESS IS IN A 
STILL THE MASS STORAGE 

COMPLETION ADDRESS 





01450 

01450 
1300 0 030 

Q 

145 0 
1451 

SWAPER16 ECU 
SHAQ 

¥ 

24 

MASS STORAGE ADDRESS 

TO Q 




5 j. “ 

01452 

01453 

54103341" 

20101433 

53600000 

X 

1453 

1454 

LD A 
TAI 

L 0W v A LP Nj XI 

P AGET ABL,XI 

X 2 

GET THE PAGE NUMBER 

X2 POINTS TG THE VMM 

WORD 




.6X454". 

01455 

.-—01456. 

20001310 . 

5304Q000 
4Q.20 00 0-0- 

X 

.1455. 

1456 

--1457. 

.CD A 

AQA 

.-.ST A. 

8 IT 2 2 

.0 , X2.-.. 

MEW PAGE ACCESS WCRO IN A 

STORE P A G E-ACC ESS -W O RD I NT O - V M M 





.0) 


01057 

01460 

01461"“ 

01462 


20001452 
40101457 
5310 0 0 0 0- 
12000013 


1458 

1459 
1460- 
1461 


LD A 
ST A 
TIA 
SHA 


PAGETA8L, XI 
XI 
11 


GET SYSTEM PAGE ENTRY 
INDICATE PAGE IN USE 

“PAGE NUMBER..... 

18 81T CORE ADDRESS 


01463 14277777 X 

1462 

ENI 

GAMBLE,X2 




01464 13 DO O’O 30 

1463 

SHAQ 

2 4 

GET MASS STCR 

AGE.ADDRESS INTO A 



1464 
-146-5. 


01465.01077 777.X. 


01466 00703006 P 

"Q-146'7~—0 0--76"3-frl-5~“P" 


1466 

1467 

14*6*8“ 

1469 

1470 

Tvrr 


«• 

■3r 

HH* 

* 


H - A^S — S T O R A CE.A80R€SS - 

Q IS 18 BIT CORE ADDRESS . 

X2 IS WRITE OPERATION FOR PAGES 

X3 IS RETURN ADDRESS FOR SUCESSFULL WRITE 

X3-1 IS RETURN ADDRESS FOR WRITE MEMORY ERROR 


s O 

9 o 

L ■ 

sO 

6 

o 


. 01 , 


147 3 
1474 ' 


U3F 


SWAPRTN1 RTJ 


SWAP 


S WAPMPE1 


TStTEUETRE .Tran s per' 


.. 7 I. 


THIS CODE IS PUT INTO THE 

4 ■ WORD ■ REQUEST ' BIOCK.. 


O 

i. 

o 

o 


o 

o 


o 

o 


o 

o 






o 

o 

o 

o 












































CD 

ASSEM3LER/0S3 VI.0 

09/21/74 

2259 PAGE 

1477 

..1 1x7 A. 

CD 




1479 

Q 

01470 

01470 

20201436 

P 

X 

1481 . 

1482 

1483 


...01471. 

01472 

35001454. 

40300000 

.x. 

.1484. 

1485 

liiSf 

Q 1487 

148 8 

o ... 


01473 

P 

140, 

1490 

1491 


.01473. 

01474 

01475 

1447 7776 
05100002 
34 00 3335- 

...P. 

.TW2. 

1493 

.i„4g...4... 

o 

01476 

01476 

53020036 

P 

1495 

149 6 

. A ri “ 

o .. 

0 IbO 1 
01504 
01505 

i f '06 0 0 U 0 

54103341 

20001460 

P 

X 

l*+9 /. 

149 8 
1499 


~.015 0 6'. 

...0.150 7.— 

“40T0'”15€'5“ 

.5 .. 4 . 3 . 0 .. . 3.3 2-5- 

'“X..-.“ 

.p........ 

150 0 

1501 

...1„5. Q? .. 

O ' 

01510 

01511 

05300001 

01001515 

p 

15 0 3 

15 0 4 

o 

0 1512 
01513 
01514 

20 30 0 0 00 
44 00 3325 
01001533 

p 

p 

~...15 U 5. 

1506 

1507 


....01515.. 

01515 
.54 30 332 6 - 

p 

p.. 

:.I5TTS. 

1509 

...15.10._ 

o 

01516 

01517 

04303326 

01001526 

p 

p 

1511 

1512 

o 

01520 

01521 

54103341 
146Q0000 

p 

± Jj 4 
1515 ' 


. 0T52 - 2 -. 

01523 

...01524. 

4'QTO'l 5'0 6” ’ 
14600001 
-34 00 3 3 35 

.X".'. 

...p. 

1516 

1517 

.:,i.5.1..£. 

o 

01525 

01001702 

p . 

r. 

1519 

152 0 

o * 

01526 

01527 

U 15 2 ft 
21300000 

2 7 0010 37 

» 

X 

i 5 d 1 

152 2 
1523 


. 0153 0. 

01531 

. ; .015-32—... 

TEWOS 0T 
14703326 
....410 0 3326 

p 

Q 

152? 

±59 5 

...152 6. 

o o 

__ 015-3-3— 

0153 3 
■7774 0 00-0- 

p . 

152 7 

152 8 

■———±5«G—- 

153 0 

1531 

i ,2 . 

.:.0153..4.. 

25001555 

. Sl ... 

.1532 . 

1533 

...-I. 5 . 3..4 _ 

O " 

01535 

45300000 


1535 

a rr -y c 


1536 

io 15 3 7" ’ ™ 


153 6 
1539 


. ....TSTflT-” 

1541 

. 0 ... 1542 

O . 

7 

O, .. 

01536 

01537 

5420 3341 
53200000 

P 

1543 

1544 

-.1545. 

1546 

1547 


.... 01540. 

01541 
..01542 

.1470 0 000 

13077762 

20300002 


154 8 
1549 

155 0 

O a . 

01543 

01544 

n ic /, c; 

03 301557 
20300003 
i, a *2 n ii ii n *2 

P 

1551 

1552 

. a c c; *2 

Q 

J ± z> H J 

01546 

Hr lo UuU Uo 

37077777 

X 

.It? P 0 

1 5 b 4 


26 


SCHEDULR 


SWAP PROCESSOR 


* * 

..„. ¥ 

¥ 


HERE WE PROCESS.THE.NEXT ITEM OF THE SWAP QUEUE 




IWA PER3 0 EQU 
LDA 

. SS’A 

STA 


PAGEMSA,X2 

81T 2 2. 

0 ,X3 


GET MASS STORAGE 

BIT.22 SEZ PAGE N 

PUT INTO PAGE ACC 


* 

v- 

~*~ 


AN AVAILABLE PAGE HAS 
THE PAGE NUMBER IS IN 
THE" IN TER RU PTS MUST.BE 


BEEN FOUND. 

LOWVALPN. 

OFF AND LE VEL ONE IS.A M 


ADDRESS 
OTINCORE 
ESS WORD 


UST. 


;WAPER32 EQU 

.ENA, S' 

ISG 


SWAPER34 


SWAPER42 


EQU 
—LDX- 
ISE 
UJP 

LDI 

ENA 

'“STS'" 
ENA 
—JRA-D- 

UJP 


rWA'PER¥-8—EQU— 
LOQ 
LDL 

.-a-sGTS- 

ENQ 

-SIC,— 


-RAD-- 

EQU 

LEVELC 

DTNTC— 

LDI 

LDA 

“STS .~ 

-LOT- 

ISG 

UJP 

LDA 

SWA 

UJP 


-1- 

2 *X1 
FPCNT 
* 


LOWVALPN,XI 
PAGETABL 

'P A GET ABET XT” 

RKSWAPQ,X3. 

1»X3 

SWAPER42 

-rj'xs———— 

RMSWAPQ 
SWAFERS 0 


PISWARQ , X3 
PTSW APQ,X3 
S WAPER48 


LOWVALPN,XI 


“F'S'G'ETSB'tTX'F 

1 

-F-PCNI- 

SWAPER68 


0 »X3 
BIT17 

T ““ 

PTSHAPQ 
.■&.TSM.A.P£t- 


SKIP IF USER PURE 
■INDICATE.ONE.LESS 


CODE 

■FREE.PAGE. 


GET FREE PAGE NUM 
PAGE ZERO IS ALWA 
MARK.THIS.PAGE.AS 


BER 

YS SYSTEM 
“.SYSTEM'. 


.OH EG K.-THE.S EC O N0 A R¥ QUEUE 


SECONDARY QUEUE E 
“TAKE'.A.NOD E“FCR K~ 


MPTY 

SECONDARY”'QUEUE. 


-CHECK- OUT- MAIN GUEU£. 
SKIP IF EMPTY 


GET UN-USED PAGE NUMBER 

“IWOTCATE.A.FEE E.PAGE.‘.“. 

-I N-D-ICA-TE.AN CT H E R.FREE.PAGE. 

LEAVE. 


MAIN Q IS NOT EMP 
REMOVE AND PROOFS 
'SKIP.IF.THIS.IS.N 


TY 

S 1ST ITEM 
OT THE ONLY NODE 


SWAFERS 0 EQU * 

VFO A 12/EINT 

* X3 POINTS TO THE REQUEST BLOCK 

..*......AND.LOWVALPN CONTAINS.A. FREE .“PAGE.NUMBER .■.““ r " “ " ' 

LOAQ SWARRTN2 

STAQ 0,X3 SETUP RETURN LINKAGE FROM. OISKCOP 

—* .THE "CONTENTS OF THE REQUEST BLOCK IS.. 

* WORD 0 RTJ SWAPER2 ERROR RETURN FROM OISKCOP 

*'.—--"WORD.T .”RTJ~.'■.SWAP 2 ....NORMAL.RETURN. . . 

* WORD 2 VFQ A9/0,A15/VMM-POINTER 

_ ± _WORD—3_JV.FO...A24/MASS..aS.T.OR.AG.E=.A0.0.R£S.S._:.._ 

* WORD 3 GETS CHANGED TO.. 

WORD 3 VFD A6/0,A18/C0RE-A0DRESS 

LOI LOWVALPN,X2 GET THE FREE PAGE NUMBER 

TIA X 2 

- ENQ -a --;------:------— 

SHAQ -13 Q CONTAINS THE 18 BIT CORE ADORES 

_ ; __LDA.2 , X3. .GET. THE VMM POINTER ___ : 

AZJ,LT SWAPER53 JUMP IF A PAGE REQUEST 

LDA 3,X3 GET THE MASS STORAGE ADDRESS 

—— —STQ— --SAT/t THE GORE -ADDRESS 

LP A VMMMASK REMOVE TCP OCTAL OIGIT 
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0 

o 

Q 

O 

o 

o 

o 


o 


U 


o 

o 

o 

Q 2 - 

o ! 

10 * 

o E 

o f 

? 

o 6 

o 5 


G154 7 .40 201470 X 

01550 03001570 P 

.01551.14277777 X 

01552 15300001 

01553.77730000 

01554 01001465 X 


01555.00703034 P 

01556 00703027 P 


1555 

1556 

1557 

1558 

1559 
15 60 
1561 


SCHEDULR SWAP PROCESSOR 

' 'ST A P AGE MS A , X 2 

AZJ,EQ S WAP ZP 


SAVE 1HE MASS STORAGE ADDRESS 
ADORESS OF ZERO MEANS ZERO-CORE 


ENI 

INI 

VFO 

UJP 


.1563. 

1564 

1565 

1567 

1568 

T56T 

1570 


SWAPRTN 2 RTJ 
RTJ 


READ,X2 
1 ,X3 

A 12/DINT 
SWAP 


SWAPPER- 
SWAP 2 


INOICATE READ OPERATION 

MAKE NORMAL COMPLETION ADORESS 

QUEUE THE DISK TRANSFER 


THIS CCDE IS.PUT.INTO THE.. 

FOUR WORD REQUEST BLOCK 


V-V- ¥ ff Y ¥ * Y Y Y -Y Y Y Y YY Y Y Y Y Y Y Y Y Y Y 

4 * 

* 

. 

* 


HERE WE 
TO. FREE' 


PROCESS 

STORAGE' 


REQUESTS FOR 
OR FILE.CORE 


PAGES TO 
BLOCKS'*. 


B E.CONVERTED 


"Y 
* 


1572 


n a a iz 

01557 P 


1573 

SWAFERS 3 

EQU 

* 




0155/ 

01560 

....01561. 

63ouoUUU 
53500000 
14300Q02 


..1’57 4' .. 

1575 

1576 


11 A 

TAI 

ENI 

X 3 

XI 

2»X3 

SAVE THE 
4 WORDS 

BLOCK ADDRESS 


0156 2 

'"T07IT3E63'"'F. 


. * .1577... 


"RTJ. 

.FREEMEH “ 

“FREE”.THE" 

BEOCK 



01563 14301700 P 

01564. -5-3 0-2-0-0-06— . 

01565 15467777 

01566 53420006 

-G156-7—{ttrS-OUD^r ” ' 


1578 
-157-9- 
158 0 
1581 
T58"2‘ 


ENI 

--T-M-A-—. 

INA, S 
TAM 

-UDPi'T- 


SWAPER66,X3 

... 6-8 ----- 

- 10 0 0 OB 
6 B 

2, XI 


RETURN ADDRESS 


-DUMP ~TO ROUTINE REQUESTING PAGE 


O 


































CD 
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1585 

4 58 5. 

* * * * *:• v v * x- * -v- * -v- * # ¥ * * * * # # # * ^ # 

* 

.*.TH TS ROUT INF TS 0 A1 1 FO WH 

Jf. 

FN A USFP FTRST RFFFFRFNHFS * 






1587 

1588 

♦ A ZEROPAGE. THIS ROUTINE 

* NOT ALLOWING THE USER TO 

FILLS THE PAGE WITH ZEROS * 

EXAMINE SOME OTHER USERS * 


O 




158 9 
1590 

r ntTTUKY 

* 

. . ' . . ... .... .. ^ .. . . .. ..... ...— 



.... ...01570. 

01570 
.53 2-0 O O-Q O 

P 

1592 

1593 

.1594. 

SWAPZP EQU 

.t.t.A-. 

. X2. . 

.PH Y S T A L.P-A G F.N UM R F R.T O A... 


o 

01571 

01572 

12000002 

77640001 


1595 

1596 

SHA 

APF - 

2~ 

P FLOC + PFW 

POINT PAGE FILE 1 AT THE PAGE 


o 

Ulb ( 6 
01574 
01575 

X b Q f i ( 1 i 

14200776 

45204000 


159 7 

1598 

1599 

SHAO 

ENI 

STAQ 

- 48 

7753,X2 
CORE+Q0GQ8,X2 

.ZERO A AND Q . 

ZERO EIGHT WORDS... 



.01576. 

01577 

....0480.0-. 

.45'2ff5¥¥0. 

452Q600Q 

.452-0-7-0-0-0. 


16 0 0 
1601 

..1-&.0-2.. 

STAQ 

STAQ 

..........CTM.. 

C ORE +10 0 0 B , X 2 
C0RE + 20 00B, X2 
...nnpc+ 3PP or . x p. 

.IN 14 CORE CYCLES. 


o 

01601 

01602 
n t cl n *2 

10 60 0 000 
02601575 

7777 a nn n < 

P 

16 0 3 
1604 

ISO 

I JO 

G ,X2 
*-5, X 2 



o 

.. .UxbU o . 

01604 

01605 

f f t u tl u U U 

53300000 
5360 0 080 


lb y > 

iso e 

1607 

M r u 

TIA 

TAX 

A 12 / BI N I . 

X 3 

X2 

MOVE REQUEST 6LOCK POINTER... 

...TO INDEX 2. 



.......0-160-6 - 

01606 
.5-3-0-2-0-0-36. 

P 

'Teirff - . 

160 9 
.461-0.— 

SWAPER54 EQU 
...-LE-V-ELC- 

IF 



o 

01611 

01614 

,, a j /: .< c 

77630000 

20600002 


1611 

1512 

DINT C 
LO A s I 

. . , A774*-iwA-EL 

2 , X2 

GET VMM WORD 


o 

ulolB 

01616 

01617 

tiocUl 026 

53500000 
20100000 

I ’ ■ 

16 i 4 
1615 

Ax J » 
TAI 

LOA 

....S'WftPE K6 4.. 

XI 

0 ,X1 

. JUHP IF.NCT sYSTtM PURt CQDt 

GET LI6TA8 WORD 






181 6 
1617 

.16-1-8.-. 

^ FORMAT 

.. * ..WORD.0- 

OF THE PURE CODE 2 

......y.FD.. A-9/0-, 

-WORD LINK LIST IS.. 

A-15/P-SA-P 0 X NT ER ■ 


o 



,,,.,Q. 

ISIS 

1520 

■ ¥ WORD 1 

c 4 tj; a r,jrrv£i a rnt j 

VFD A9/0i 

A15/POINTER TO NEXT, OR ZERO 


o 

01620 

01621 

U lucU 
535QQ000 
05100001 

r 

la c 1 

1622 
162 3 

.S W A Pt r? C U.c.Utl.. 

TAI 

IS 6 

XI 

..i»xi . 



o 

01622 

01623 

..01624. 

01001634 
20100000 
53-70-0-0-0-G-- 

i*~. 

.1624.. 

1625 
.1&2-6.. 

“ .UJF.: 

LOA 

..TAI. 

SHAPERS2 . 

0 ,X1 

.X3...:....... 

DUMP IF CHAIN PROCESSED 

FIND USERS WAITING FOR... 

.. . . t h t S.P. A-G E.T-0.B E.S W A P P EC.I N .._ 


01625 

01626 

14477777 

34301353 

T"... 

X 

1&2 7 

1628 

4 o fi 

ENA j S 
RAO 

NMSWAIT 

IOBOUND, X3 

CLEAR THE MASS STORAGE WAIT. 


o 

.U l b £ 7.. 

0163 0 

01631 

d O X U U U 'U'tl 

14308001 
0070 3263 

p 

■ X'O'tT 

1& 30 
,16 31 

! a A 

ENI 

RTJ 

X X 

1 , X 8 

FREEHEM 

A0DRcSS Ur oL G CK I U FRc.£ 

INDICATE 2 WORDS 


o 

(j^g-32— 

0163 3 

.2'riEJWOT. 

Q1001620' 

p 

""1652 — 

1633 

1634 _ 

.. LD - A -..- 

UJP 

1, X1 

S WAFERS 0 

ADDRESS" OF ' NEXT * Z~ WORD ""ELEMENT 


01634 

. H4 £. . 

016 34 
i46aa00'i 

„ * 7; ■ t 7/ .7 

p 

D 

1635 

1636 

SHAPERS2 EQU 

ENA 

7; * n 

¥■ 

i 

IT Hi T* v. T 






TT ' 

i opf 

— ** 


INuiOAit UNt MLKt rKtt P Abfc 


Q 2 


0 1636 

p 

lobe 

1539 

SHAPERS4 ECU 

♦ 




01636 

_.0.163 7 

77 74 0 0 00 
2520.0 0.02.. 


1640 

1641 
-.1.6.42... 

VFD 

.....LQAXl_ 

A12/EIMT 
? ,XP 

. VMM POINTFR,.18.BIT CORE ADDRESS.. 


d s 

01640 

01641 

fi 1 £ h -O 

53500600 

20100000 
;1 *2 "J 


1643 

1644 

TAI 

LDA 

XI 

Q,X1 

& 

GET THE VMM POINTER, 

GET THE VMM WORD 


10 

o. 

U loq- & 
01643 
01644 

d £ U -i. • *+ 1 + 

5350 0 000 
14600000 

P 

1646 

1647 

.AZJ*, $£• 

TAI 

■ENA 

ah 

XI 

0 

. .atfflF—xr. No 1 S YS I bn.rtlKlr.troxil.. . 

PUT PAGE ACCESS POINTER IN XI 



01645 

01646 

.....01647. 

1 3 Gotrois" 

5370 0000 

..,i..5..&..o.i.e..o..o... 


“T6'48 

1649 

.1.6.5.0.. 

.......sTTAtr-. 

TAI 
xn a 

. 2 ‘^ITT”... 

X 3 

■ ino or 

S E T T H g p 4 G E' NUMBER" ..... ~~ 

PAGE NUMBER IS PUT INTO X3 

INDICATE PURE PAGE . . . .. .... .... 


o 8 

o. 

0165 Q 
01651 
- - 01652 

01653 
01654 

40100000 
21001471 
■2 0 60 6 0 0 2 
05400000 
21000755 

X 

X... 

1651 

1652 

1653 

1654 

1655 

ST A 

LDQ 

~ — - -— izB-ky-. I— 

ASG, S 
LDQ 

0 ,X1 

81T 2 2 

2 ,X2 

0 

8IT21 

SET UP PAGE ACCESS WORD 

USER PURE PAGE 

-.GET VMM"WORD 

SKIP IF USER PAGE 

MAKE INTO SYSTEM PURE PAGE 


o 3 

... 01655 

01656 

...........0165.7.. 

.5 3X0 0000. 

53040000 
.7773 0 000. 


1656 . 

1657 

.16.5.8. 

TIA 

AQA 

_;_. VFD__ 

- XI - — 

_.A12/DINT,A12/0 

pAGE .ACCESS.WORD POINTER............ 

NEW PAGETA8L WORD IS FORMED IN A 


0166 0 

01660 

40301522 

, c t n o n n o o 

.p... 

X 

1659 

1660 

SHAPER65 EGU 

ST A 

. X fvt - A.. ... . . 

* 

PAGET ABL,X3 

ni noi/ 



Q, 

U lob 1 
01662 

z> d U c U u £c 
30000735 

X 

±box.“ 

1662 

IMA 

ADA 

.oLUbK 

HOUR 




o 










































a 

■ CD 
O 

a 

G 

o 

G 

o 
o 

Q 
O 
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SCHEDULR 


01663 

01664 

_____04665. 

40301344 X 

20200002 

.. 53.51111 .o n n....:...... 

1663 

1664 
. 1 Ear . 

3 T A 

LDA 

.j._ 

PAGETIME,X3 

2 , X 2 

.X ± . ; .... 

UPDATE LAST REFFERENCE TIME 

VMM POINTER 

01666 

01667 

17177600 

14401625 X 

1666 

1667 

AN I 

EN A, S 

776008,XI 

NMSWAIT 

PSA POINTER "G 

.. 015/0 

01671 

01672 

34101626 X 

47103334 P 

14601046 X 

1666 

1669 

1670 

.RAD. 

ST I 

ENA 

I090UNO,XI 

X FLA G,XI 

SWBIT 

**** INDICATE SWITCHING _ 

.,,G 

....01673 

01674 

35001050 X 

40001673 X 

1671 

1672 

..:. 4 6 73. 

S3 A 

STA 

FLAGS 

FLAGS 


01675 

01676 

5320 0 000 

14300002 

1674 

1675 

TIA 

ENI 

X 2 

2 ,X3 

GLD REQUEST BLOCK ADDRESS G 

ENTER LENGTH CF 4 WORDS 

01677 

JO 70 3263 P 

01700 P 

1 o7 o 

1677 

1678 

.. ........RTJ. 

SWAFERS6 EQU 

F REE MEM 

¥ 

FREt THE OLD REQUEST BLOCK 

..:.'.:. nO 

.0170 0. 

01701 

.14 477776.. 

34003063 P 

.167 5. 

1680 
_ 45«4 . 

.EN’A’jS. 

RAD 

QCGUNT 

INDICATE ANOTHER SWAP PROCESSED. 

01702 

01702 P 

14477776 

1682 

1683 

.SWAPER68 EQU. 

ENA, S 

* 

-1 

. J o 

_ "IV1* 4-TV T ■ /TV:- A.-.-.T,. r*T ■ ■■..■.■•/"V k i I"” 440** >.>.(4 n ... , . , , , / 1 t 

01703 

01704 

34 00 3 06 0 P 

01003060 P 

~1'6"8'4~' 

16S 5 

.RAD. 

UUP 

S WAPNUMB 

SWAPER99 

INDICATE ONE EESS REQ.UEST» « • 

...BEING PROCESSED 

...........:._..._. ...:.._._________t LJ 







o 






o 


o 


o 



o 
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. 16 8 8..TINE.INi ERRUPi S A QUANTUM.IS.FINISHED.. 

01705 54103323 P 1689 RMTIHEUP LOI RPSAPTR,X1 POINT TO THE RUNNING USER. 

.01706 14600 000.- - -—1690..ENA--0 --- ..-.~.- ..- 

01707 40177777 X 1691 STA TIMELEFT,X1+PS A SAY THIS USER HAS NO TIME LEFT. 

01710 42015560 P 03334 0 1692 SACH XFLAG SAY WE GOT THE INTERRUPT. 

01711 14601672 X.—. ...1693..-...... SW^rT'&H-USERS'.—— 

01712 35001674 X 1694 SSA FLAGS 

01713 40001712 X 1695 STA FLAGS 

01714.0130 0000.’......1696. .UUP.. 0 ,X3..... : .”... 

169 7 

.-.01715 P.- -1698 -SWITCH—- EQU----— -COME HERE TO SWITCH -USERS.-- -- 

01715 00502250 P 1699 SJ5 RUNIOLE 

01716 20003334 P 1700 LDA XFLAG 

01717 0 3 2017 24 P ———1/701 —^ WfTem _———-———tftN1P“TP WE GOT~THE'- LAST" SWITCHING 

01720 20002303 P 1702 LOA TIMEUP INTERRUPT. SUPPRESS IT IF NOT. 

01721 00777777 X 1703 RTJ TIMEKILL 

01722.54 20 3323.P ... : 170 4... UDI R PSA PTR, X2....“ . . .... 

01723 40201707 X 1705 STA TIMELEFT,X2+PSA 

01724 5-313 0-0-35.- 170-6-S-W-I-TG-HX THI-N-U, X1----- SET THE- ND-MSER OF USERS-.. 

01725 20003314 P 170? LOA INHIBIT 

01726 17600205 1708 ANA FSWAITS + DISKI8T+RUNIBIT CHECK BITS OF INTEREST. 

01727.0310-2250 P ... — • 170 5 -- ' • .ftZ - drN €-R*t#NTOt€.......... 

01730 10 003356 P 1710 SSH SFLAG SKIP IF SCHEDULING HOT NEEDED 

01731 01001754 P 1711 UJP SCHED PROCEDE TO DO CORE SCHEDULING 

irrrjz~iT*zuTnnrar .~.* 1712 . — ENT 07x2 coont ready users m xi.. 

01733 54303334 P 1713 LOI XFLAG,X3+PSA GET LAST USER*S PSA 

01734 05-30-Q-a-0-l- ---171 -4-:--ISO.1,-X3+-PSA— -.--SKIP - IF -K-E ARE PO-INIXNG AT A PSA.- 

01735 54 703323 P 1715 LOI, I RPSAPTR, X3+PS A START THE NEXT USER IF NOT. 

01736 20301670 X 1716 RMSW3 LOA I090UND,X3+PSA 

017 37 03 201741 P. 1717 ....-A~ZtJt6 £---~~- 1 - ; - 

01740 17677777 X 1718 ANA MBITS EXAMINE ONLY N8ITS IF NEGATED 

01741 0310175G P 1719 A2J,N£ RMSW4 JUMP IF THIS LSER IS I/O BOUND. 

0174 2.1‘5'2'G'Q'O.0T“. 1723..I MI.1 ,X2'. . .INCREM ENT.C O U N T OF UN BO UNO. 

172 - ! * USERS WF HAUF LOOKED AT. 

-01743. 0-5-2.0-0 0-0-2 -- 17-2-2 .IS-G.-.2-,-X-2--- SKIP IF'THIS“IS NOT THE FIRST. - 

01744 47303331 P 1723 STI XTEMP,X3+PSA REMEMBER HIM IF HE IS. 

01745 20301723 X 1724 LOA TIMELEFT,X3+PSA 

017 4 6 147-7-7-? 77 -X 1725— • - - - -----ENQ.— —M DU A NTU M — .—... - . 

01747 03602310 P 1726 AQJ,6E RMSW8 JUMP IF ENOUGH TIME LEFT. 

01750 2 0 30 Q 0 30 1727 RMSW4 LOA 0.X3+PSA LOOK AT THE NEXT USER. 

017 51 53700030 . 1T2T8’ . .".^TAT .X3'+FS“H' r ......“.“....'.*.~ 

01752 02501736 P 1729 IJO RMSW3,X1 LOOP THROUGH ALL THE USERS. 

-0-1753 ... 02 60 2304 P ____1730.....-IJO--RMSW1,X2---..—JUMP-.IF.ANY.U-S-ER-.NOT.I08CUNB-..-.- 
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PAGE/FILE CORE-BLOCK 
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1734 

- ..4735. 

W ¥¥ ¥ ¥¥¥ ¥ 

¥ 

¥¥¥ ¥¥¥¥ ¥¥¥¥¥ ¥¥¥ ¥¥¥¥¥¥¥¥ ¥¥ ¥¥¥ 

twk n n n p r .maw ..ejjis d acec in 

¥ ¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥ ¥¥¥¥¥¥¥¥¥¥ 

¥ 

.cur.. r no p .m nrur c. amu.ft i. c .rnpc.¥... 

, 

0 




1736 

1737 

¥ 

¥ 

BLOCKS 

SECTION 

TO PAGES. USER DELAYING IS ALSO CONTRCLED IN THIS * 

*.. _IHE..CODE_IS_ENTERED BEFORE RUNNING IDLE OR WHEN ■* 


0 




l/\io 

1739 

lULt 1 j IN U KU(N A IN U 1c U jLK oWllUrlt j UOUUKto 
¥ ¥ 

V' ¥ ¥ ¥ ¥¥¥¥ ¥¥ ¥¥¥¥¥¥ ¥¥¥ ¥¥¥¥¥¥¥-¥¥¥¥¥¥ ¥¥¥¥¥¥¥¥¥¥ ¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥ WW> ¥¥¥¥¥¥ 



.017-54. 

01754 
.77 74 0 0 00 

P 

.17 41. 

1742 

...4 7 43. 

SCHED 

EQU 

.ypD. 

¥ 

.A 4 ?/ PINT.-. 



G 

01755 

01756 

53020022 

30001662 

X 

1744 

17 45 


TM A 

ADA 

CLOCK 

HOUR 

COMPUTE EMPTY AGE REFFERENCE TIME 


o 

u 1757 
01760 

1547405/ 

40003344 

p 

17 46 

1747 

1748 


INA, S 
STA 

— 2000 

A GEL I HIT 

.TWO SECONDS. 






1750 

....47-54. 

.¥¥'W¥''¥W¥". 

¥ 

¥ 

¥ W ¥ ¥ ¥•¥ ¥ 

ucprr . y p 

¥¥ ¥ ¥ ¥ ¥ ■¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥¥ ¥ 

n nM.oi it. r t uc miimocd 

¥ ¥¥¥-¥¥¥ ¥ ¥ ¥¥¥ ¥•¥¥¥ ¥ ¥¥¥ ¥¥¥¥¥¥¥ ¥¥¥¥*¥¥ ¥¥¥ 

¥ 

a r i n u -\i a i i ip n .... cac pc -. . ..¥. 


O 




1752 

. ... . ..nu-i\u.jvt.vrwr r»-wi"ss.rnir" fiviiwun vi- kwh .v hkwk b.j nv u . 

¥ ¥ 

¥¥¥¥ ¥¥¥¥¥¥ ¥¥ ¥ ¥•¥¥ ¥¥¥¥¥ ¥¥ ¥ ¥¥ *¥ ¥¥ * ¥¥ ¥ ¥¥ ¥•¥ ¥ ¥ ¥¥ ¥ 4 ¥ ¥¥¥ ¥ *¥ * ¥ ¥ ¥ t 


O 

01761 
0176 2 

47003346 

14101337 

p 

X 

1 / 54. 

1755 

17 56 


STI 

ENI 

EPAGECNT, 0 

NPAGESMI,XI 

START WITH ZERO 

NUMBER OF PAGET AS L ENTRIES - 1 


.*..01763 

01764 
..Q1765 

“"20 fQX 6 W 
0 3 3U 2 011 

.5.3-70-0 00 0 

"'X.. 

p 

... 175 7 . 

1758 

..i-7-5-9. 

SVAL1Q 

.OTA.. 

A2J,LT 
TAI. 

.R ABET ASX, XI. 

S VAL14 

_.x 3 . 

‘GET.P AG ET AS L.: E N TR Y. 

JUMP IF SYSTEM RAGE 

. SAVE V-MM POINTER .-..-. 


o 

o 

01766 

01767 

.0177 0 

01771 

01772 

12077752 

21101663 

53600000- 

01201772 

01002026 

X 

p 

p 

1760 

1761 

.— -1762. 

176 3 
1764 

______ 

SNA 

LDQ 

~mt —-— 

UJP 

UJP 

3-24 

PAGETIME,XI 

*+l, X 2 

SVAL1S 

GET UPPER 3 BITS 

GET LAST REFFERENCED TIME 
-PAGE‘ USEAGE' CODE~?0“X2 

0 = UNUSED PAGE 



.""..0X773." 

0177 4 
....01 775 

.0100 2 027"" 

15500000 

.1-7-3-7-76-00- 

~p... 

1765 

1766 

.-....X76-7--. 


“UJP 

INQ»S 
.ANI_ 

...STALX 6 . 

0 

....7760GB.X3..... 

.I.=.SYSTEM.PURE.F'A'GE... 

2 = USER PURE PAGE 

. 3 ..=..USER.IMPURE-.P-A-GE--.-.-..-.-.-.-. 


o 

01776 

01777 

20301736 

03302005 

X 

p 

1768 

1769 


Ida 

AZJjLT 

I0B0UND,X3+PSA 
SVAL12 

GET IG 6 GUND STATUS 

JUMP IF NEGATED 


o 

0 20 0 U 

0 2001 
02002 

17 401355 
03 00 20 0 5 
17601357 

X 

p 

X 

1,7 7 0 

1771 

1772 


ANA jS ‘ 

A2J,EQ 

ANA 

■ .N KBITS...... 

SVAL12 

DELAY 

LOOK AT TERMINAL WAIT SITS 

JUMP IF NOT IN TERMINAL WAIT 



0 20 03 

0 2004 

.......Q 20 0 5. 

03102007 
15566167 
. 2-0 .Q-0~33.44. 

p 

_ p...._. 

.1773 . 

1 77 h 

.... ± 7.75 .-. 

__..S yA-Ll.2. 

■"“AZJ,NE 
INQ, S 
.i.n A .. 

S VAL13 
-5000 

_ ft gESTM 11.- - 

DEDUCT 5 SEC FOR BEING I/O SOUND 


o 

020 06 
02007 

.. ..... ri om a. n. 

tii» w U* »Jr ” x 

03702017 

14600001 

p 

177 6 
1777 

SVAL13 

AQJ,LT 

ENA 

SVALl5‘' 

1 

JUMP IF VALUABLE 


'w' 

02010 

02011 

'34-00 3 3 4 o 
02501763 

o 

i 

..17-78 ” 

1 77 9 
i ?gn 

SVAL14 

= 1 D 

IJD 

EPAG EGNT 

S VAL 1 0 , XI 

' AN01 HER WORTHLESS PAGE .. 

JUMP IF MORE. ENTRIES 


p o 

“ .020X2. 

0 2013 

....0-20X4. 

2100 33 44 
14200000 
77-73 (1 0 0 0 - 

.p.. 

. 1781 

17 8 2 

-___1783_ 


TDtr 

IT hi T 

C.IH X 

VT.D.-. 

.AGEXTMIT. : .... 

J ,X2 

..A-12/DINT.-.—.-... 

NUMBER OF EMPTY PAGES IN X 2 


02015 

02016 

02017 

02020 

54377777 

C I O.Xcr ? 

53300002 

36003324 

X 

p 

p 

178 4 
1785 

. -t-7-8 6 ' 

178? 

1788 

SVAL15 

LDI 

UJP 

TIA 

SC A 

FCLIST,X3 

SCV04 

X 3 +PSA 

PRTYPSA 

GET START OF FC LIST 

DO NOT BILL THE PRIORITY 



. 02021 . 

02022 

...0202-3. 

“"D'3'M'ZITX" 
24301033 
-.-l.7-6Q.Q-007. 

.p. 

X 

17 8 9 
179 0 

.17-91. 


“AZ"J7EGr 

LGA 

, ana. 

S l /A L14 

U OBITS,X3+PSA 

.78. :. 

FOR HIS PAGES 

GET THE USERS PAGE VALUE 
.— GET THE-VALUE -Of- HIS MEMORY. 


O' 

10 

a 

02024 

02025 

02026 

02027 

34301004 
01 00 2011 

14700000 

20003335 

.X. 

p 

p 

179 2 
1793 

——-1794 

1795 
179 6 

SVAL18 

SVAL16 

RAD 

UJP 

ENQ 

LJA 

PAGEREQ,X3+PSA 

SVAL14 

0 

FPCNT 

ADD ONE TO THE OWNERS PAGECNT 

UNUSED PAGE HAS NO AGE 

NUMBER OF FREE PAGES 

- - -.- 

y 

o 8 

.02030. 

02031 

.02032. 

.03 302 0X1 

14 30 G 767 
.OX-0 0-20-0-5- 

p. 

X 

p 

_ i79? 
1798 

.1.7.9-9. 


“""A7j",TT""“ 

ENI 

iJJP__ 

.3VAL14...•.. 

I OLE,X3+PSA 
.-SVAL12 . 

JUHp . rF . mot.ENOUGH".FREE.PAGES.“. 

SAY IDLE CWNES THE PAGE 





1800 

1301 

——18 0 2 

1804 






O, 




¥¥ ¥¥ ¥¥¥ ¥¥¥ ¥¥¥ ¥¥¥¥¥¥ # ¥¥¥ 

¥ ¥ 





1805 ..- 

18 U 6 

.*.HERE.RE.COMPUTE THE.NUMBER.OF LOR"-VALUE.FILE.CORE. BLOCKS* . * ... 

¥ ¥ 

¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥¥ ¥ ¥ ¥ ¥ W ¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥!■¥¥¥¥¥¥¥¥¥¥¥ ifjf. ¥¥¥¥¥¥¥¥¥ ¥ ¥¥¥ ¥¥¥¥¥ ¥¥¥¥¥¥¥¥¥¥¥¥ 


CT 

02033 

A o n ^ 7 , 

20300000 

H 7 '2 n 5fiC o 

D 

1808. 

1809 

...,,,....,.,-, 4 ......qa n -- 

SCVG 1 

LOA 

A 7 1 1 T 

FCS, X3 

c pa/ n *?■. 

GET STATUS 

. k,i n t it t / n t K( on n r d o c c 



U ell 04 

02035 

U o oti c u ye 
12000001 

r 

lolU 

1811 


A L J « LI 

SHA 

jovUo 

1 

ju nr 1 / U i IN rK UuKtoo 

GET RESERVED EIT 


~F 1 






cr 


■K 4 C * 














































CD 
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PAGE/FILE CORE-BLOCK 
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.,0 


.02036 

02037 
.0 2040 

03 30 20 51 
12077757 
.b 3.5 l) 0 0 0 (1 

P. 

.1812. 

1813 

.1314. 


AZJ, 

SHA 

TAT 

LT 

SCV02 

-16 

.X 1....... 

JUMP IF RESERVED 

GET ALTERED AND OCCUPIED SITS 

.PUT. A . TKiTO.xi.- ... 





CD 

02041 

02042 

0 2043 
02044 
02045 

17100003 

20300003 


1815 

1816 


ANI 

LDA 


38,XI 

FC3,X 3 





‘■'CD 

Q 

0 5 10 0 0 - 0*2“ 

03302050 

20300001 

P 

■ 181 1 .~ 

1818 

1819 


..IbG 

AZJ, 

LDA 

LT 

2 ,X1 

SCV06 

FCT, X3 

SKIP IF OCCUPIED 

JUMP IF A FREE BLOCK FOUND 

GET THE LAST REFFERENCE TIME 




.,o 


. 02046. 

02047 

.0 20 50. 

30177777 
03602051 
1520 0 0 01 

""x.. 

P 

18 2 0 
1821 

_1322. 

.SCV06. 

.ADA 

AQJ, 

INI 

GE 

.VALUE,XI. 

SCV02 

.1 j X2_ 

BIAS THE TIME WITHALTERED AND.,." 
...OCCUPIED. JUMP IF NOT OLDER 
.. INCREMENT NUMBER OF.F. FCBLOCKS. 




... q 

O 

0 2051 
02052 

20300000 

53700000 


1823 

1824 

SCV02 
SCV 03 

LDA 

TAI 


FCS, X3 

X 3 

GET ADDRESS OF NEXT FC LIST EL. 




”<3 

O 

0 20 5 3 
02054 

0430uQUO 
01 0020 33 

P 

“- ~T82 5 

1826 

1827 

SCV 04 

ISE 

UJP 


0 , X 3 

SCV01 

SKIP IF -LAST ELEMENT 




__rG 


. .0 20 55". 

77740000 


182g .- 


VFD 


- Ai2/EINT . — 






o 













o 

( i 


■o _.....:.:_______________________... i o 



o 


o 
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PAGE/FILE CORE-BLOCK MANAGEMENT 


-02056. 

02057 

02060 

02061. 

02062 
02063 
0 20 64 
02065 

0 2066. 

G2067 

02070 

02071— 

02072 

02073 

02074 . 

0 2075 

.02076. 

02077 

02100 

02101 

02102 

02103 

02104. 

02105 
02106. 


.20003060.P 

31003063 P 
12 00 00 11 

. 12077766. 

53420017 
30003346 P 

~ 0 3 2U 2Q66.P 

1460 0000 

. -40-00-3-346 . P 

24003346 P 
1200G001 
■”~3'0'0'7"7'777'"“X“ 
15477767 
03202075 P 

“~3¥6UW0'{T. 

53240000 

.12-07-7-7-7-5. 

03202101 P 
1460 0000 
40003347 -P- 
20003346 P 
21003347 P 

.X2¥QWT4.“ 

13 000014 
.53 42-0 0 07. 


1831 

1832 

1833 

1834 
18 35 
1836 

.18 37 . 

1839 

1840 

1841 
1342 

1843 

1844 

1845 

TBW 

1847 

1848 

1849 

1850 

1851 

1852 

1853 
T'85'4 

1855 

-18-5-6- 

1857 

1858 
“±*8-5-9- 

186 0 
1861 
1W 
1863 
-1-86-4- 


^^jyL' ' jjjt' Jyt,'jgs. ‘ -y:.' 

* * 

Jt---THE TOTAL NUMBER.OF LOW VALUE PAGES.IS ADJUSTED TO REFLECT .- * 

* THE LENGTH OF THE SWAP QUEUE. * 

* THE TOTAL NUMBER OF LOW VALUE FILE BLOCKS IS ADJUSTED TO * 

—.COMPENSATE FOR LARGE NUMBER OF FILE BLOCKS BEING RE-WRITEN * 

* AND THE NUMBER OF AVAILABLE PAGES. * 

if. 

.. 


LDA- 

35 A 
SHA 

-SHA— 

TAM 

ADA 

AZ J,GE 
ENA 

-S-T-A- 

LC A 
SHA 

.AOA-— 

INA,S 
AZ J * GE 

.ENT. 

AIA 

-SHA- 

AZJ j GE 
ENA 

~S*TA~~* 

LOA 

LOG) 

SHQ. 

SHAQ 

.TAM.-. 


SWAPNUMB. 

QCOUNT 
9 

-®-9- 

17B 

EPAGECNT 

.. 

0 

EPAGECNT- 
E PAGECNT 
1 

RTNCOUNf 

-8 

* +2 


*+2 

0 

• E FCCOUNT 
EPAGECNT 
EFCCOUNT 
12 
12 

7 8- 


SWAPS.IN.PROGRESS--- 

LENGTH OF SWAP QUEUE 
EXTEND SIGN 

A="-«—FU T UR E PAG E~D£M A NO" ~~~ ~~ 

AVAILABLE PAGES-DEMAND FOR PAGES 

JUMP.IF.POSITIVE.... 

NEGATIVE NOT LEGAL 


ALLOW 2 FCB PER FREE PAGE 

THIS MAY LIMIT RTNCOUNT WHEN 
...EPAGECNT.IS. S MALL _ 


ADD IN NUMBER OF EMPTY FC BLOCKS 

DIVIDE BY .4..(PAGES)..-. 

NEGATIVE NUMBERS SUPPRESSED HERE 


O 


O 
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.... .... . ... 

1367 * * 

—.—.—----—..*. —4-8 6 8.-. -* .—--- THE DIFFERENCE BETWEEN.THE . NUMBER OF.LOW . VALUE PAGES . AND .-. * 

1869 * LCW VALUE FILE CORE BLOCKS IS EXAMINED TO GET UR MIN * 

1870 * WHEN TO CONVERT PAGES TO FILE CORE BLOCKS AND WHEN TO * 






.-.1871. 

1872 

~ 

* 

* * ** ■V“V i 

.CONVERT.FILE CQRE“8L0C K S 

if. if. if. if. if. if. if. if. if. if. if. if. if. if. if. if. if. ifiif. if. if. if. jf. 

TO 

V V- V 

■“PAGE'S".'” - 

* 

^5. if, if *. 3 t i if. if if. if if. if if jy: ^ * if. Jf. if # * * 31 if. * * # # * * * * * * * * 

02107 

0 2110 

14100003 

20003346 

P 


187 4 
1875 

.18 76. 


ENI 

.CD A. 

3 ,Xi 

.FPAGFONT.. 


.NUMBER.OF.UN-US ED.PAGES... 

02111 

02112 

05400002 
15177775 



1877 

1878 


A S G , S 
INI 

2 

-2, XI 


SKIP IF MORE THAN 1 UN-USED PAGE 
PAGES ARE VALUABLE, NOTE IT. 

02113 

0 2114 
02115 

20 00334 7 
05400002 
15177776 

P 


18 7 9 

1880 ' 
1881 


t"D A. 

ASG, S 
INI 

E FCCOUN T 

2 

.-it XI. 


NUMBER OF UN-USED FC BLOCK PAGES 
SKIP IF MORE THAN 1 

FC BLOCKS ARE VALUABLE, NOTE IT. 

~.~.02116. 

02117 

02120 

■‘22445624. 

15477776 

34003350 

T . 

p 

.03345.C 

.1882. 

1883 

. 1 g.« jU. 


.LA C H. 

INA,S 

.RAO..- 

FCPT,XI 

-1 

.F CPAGELV .-.- 


GET THE SOLUTION TO THIS PROBLEM 

A MAY BE 1 , 0, OR -1 

...pc.TO-.F A 6 E. 1 ,£VEL.-.-.-.-. 

0 2121 
n oi o o 

21003350 

P 


1885 

1886 


LDQ 

FCPAGELV 


GET FC TO PAGE EQUILIBRIUM 

U 2122 
02123 
02124 

a 3 4-1 0 0 I d 
14600004 
05500062 



...186./. 

1888 

1889 


I Lm 

ENA 

GSG,S 

4 

5 0 


RESERVE 4'MORE ELOCKS 

~...~. 0 2125. 

02126 

0 2127 

'1460 0 0 0 0 
77730000 
05500024 



..189 0 '. 

1891 

1892 


.ENA.“ 

VFD 

... QSG , S. 

0 

A 12/DINT 
. 2 0 . 


.RE SERVE.WO'.FC.B LOCKS''" 

02130 

0 2131 

01002220 

34003351 

P 

P 


18 9 3 
1394 


UJP 

RAO 

CSQ4 

NRESB 


DO NOT CONVERT FC TO PAGES 

INCREASE NUMBER OF FC BLOCKS... 





"1895.. 

189 6 

«• . ! U KtOtKVt. 

¥■¥*****■****#¥**■* *** ** ******** *** ¥ ¥ * * ¥ ¥ ¥ * ** **** ¥ ****** * * * * ******* **** ** **** 





1898 

1899 

.190 0. 

.¥. 

* 

* 

* 

HERE WE ATTEMPT TO CONVERT FILE CORE BLOCKS TO PAGES# * 

.ft i .f. nnpp R.i nnk'F may rp pfffpa/fh pop nn.MA/.p.pR...T...n.& r n a..* 





19 01 

19 0 2 

* 

* 

PAGE IF 

NECESSARY.. 


.. * 

■ * 

02132 

54203351 

P 


19 G A 
1905 


LDI 

NRESB,X2 


NUMBER OF FC BLOCKS TO RESERVE 

.02133. 

02134 

02135 

143'Q''2 0T5" 
47303352 
...47.0.0 3353. 

"X. 

P 

„.EL. 


.I9G"6. 

190 7 

...1.90.8.. 

FTP 0 2 

.ENI.*. 

STI 

.SXI.. 

~.F CL IS f, X 3. 

T EMP 6 ,X3 

..FCB9USY, 0.-.. 


.GET POINTER TO START OF F.C. LIST 

POINTER TO FIRST OF 4 CONSECUTIVE 
.FILE.CORE.SLOCKS.. 

0 2136 
02137 

20300000 

53700000 



1989 

1910 

A A A A 

FTP 04 

LOA 

TAX 

A c r- 

FCS,X3 

X 3 


FCS POINTS TO NEXT FC LIST EL. 

U clH U 
02141 
02142 

U bu U tj u 1 ' 
01002244 
20300000 

p 


1 7± 1 

1912 

1913 


nU U 

UJP 

LDA 

.. ^ .. . 

ESCHED 

FCS, X3 


jK IP ir l\U! cMJ Ur r#U« Lib I 

GO TO RUNIDLE 

GET STATUS OF F.C. BLOCK 

....0 214 3.. 

02144 

..; .0 2145-... 

.35Wl"6'5r“ 

1060 0 0 0 0 
.. 4.0.30 3.0..00 

.x. 


1914 

1915 

.1:91.6.. 


SSA 

ISO 

STA 

”.RESERVED.. 

a ,X 2 

..FCS, X3...-... 


.SET.THE "RESERVED.BIT IF.... 

..•X2 IS NOT ZERO 

02146 

0 2147 

n o 4 f- 

03302157 

37077777 

n *2 n n o i ,c, n , 

~F . 

X 

Q 


1917 

1918 


AZJ»LT 

LPA 

F TP 0 6 

ALT 

rr x n n a , 


JUMP IF I/O IN PROGRESS 

CHECK THE ALTERED BIT 

.U . 

02151 

02152 

u O'Utr d lbu 
05200GG1 

Q1002157 

P. 


* l^l 5 

1920 

1921 


A L *J f iiQ 
IS 6 

UJP 

* J « U O' 

1»X2 
“FIFOS 


.UU Mr.Ir.MU 1.MU 1 tzH L u . 

SKIP IF RESERVED. BIT IS SET 

JUMP IF NOT RESERVED 

..02153." 

02154 

0 215 5 

""2'03"0'0. 0 02 . 

53 50 0 000 
25100002 



rgc'S.-. 

1923 

...1924. 


LDA 

TAI 

. tOA.Q._ 

.F'C Ki X3. 

X i 

..COREP,XI. 


WE HAVE DECIDED' TO REWRITE THE... 

...FILE CORE BLOCK. 

02156 

02157 

- . 0 216 Q 

02161 

02162 

00 777777 
47303353 

.1000 3354 

01002136 

54103353 

X 

P 

P 

P 

P 


1925 

192 6 

.192 7- ■■ 

1928 

192 9 

FTP 0 6 
-.FTP 0 8 • ~ 

RTJ 

ST I 
~—SSH 

UJP 

LOI 

REWRITE 
FC3BUSY, X3 
EPFLAG 

FTP 0 4 

FC 88 USY,X1 


INDICATE THE FOB NOT AVAILABLE 

.- SKIP' IF “4“ FGB/'S EXAMINED-” 

LOOK AT THE REST OF THE PAGE 

GET THE FCS BUSY FLAG 

~.. 0 2163 

""'0 250"2134" 

"F” 


...X'93'0 

1931 

1932 - _ 


.TJQ' 

. FTP 02,X1.. 


.- JO M P IF AN Y F'C B W'A"S BUSY ' . 

Oi ,0 4 4 /. 

■i f. in 0 0-0 0 



1933 

1934 

-4 Q “?.CT ... 

* 

A PAGE 

HAS BEEN FOUND. 

....r?,D £T-o. c,d \ / tr .. 

THE 

FC LIST ELEMENTS MUST BE FREEEO 

pi c a o ncc cr d \i cr -... ........... , 

. U C ± O H* 

02165 

02166 

■ 1 H- 01 J C c, CC " 

44 0G3Q57 
20 30 0 000 

P 


loot? 

1936 

1937 


■".bNA 

SWA 

LDA 

UKtStKVC 

SWAPPC 

FCS, X3 


UL L A K K t.o Cb K VL. 

RETURN ADDRESS 

HERE WE UNLINK THE FOUR 

02167 

0 217 0 
_.. 0 2171 

'-54503352'"' 
44403352 
. 2 010 0 000 

P. 

P 


ig38 - 

1935 

.1,94.0. 

..EIRIQ._ 

— CUTTI 

SWA, I 
.LDA.. 

' .TEMP6,X1... 

TEMPS 

FCS , X.1 " 


.T.TF C.LIST.ELEMENTS.FROM..... 

...THE F C LIST. 

.GET THE STATUS.AND:.NEXT POINTER- 

02172 

02173 

02174 

02175 

44003352 

37077777 

03002201 

20100002 

P . 

X 

. P— 


1941 

1942 

A Q Ll 2 


SWA 

LPA 

.A 7.J.c n ,.- 

TEMP 6 

OCC 

_ ^C. TO 4-0 


SAVE THE POINTER 

CHECK THE OCCUPIED BIT 

11 i m c r p.., Ki n t n r r i i dtp n 


.1 o HO..~~ 

1944 


HZ sJ -f tlTji 

LDA 

FCA, XI 


—^—ari— iN u i U L UUrltU 














































FAGE/FILE CORE-BLOCK MANAGEMENT 

X3 

0 

. COREP,X3..-..—.-. -4 .-.r. 

XI GET ADDRESS CF F C LIST ELEMENT 

2,X3 LENGTH OF F C LIST ELEMENT 

—PREEME M~ .. ..FR EE T HE EL EM £ NT..* . 

FCA.X1 FCA CONTAINS THE PAGE NUMBER 

TEMP6.X1 . GET POINTER TC NEXT ELEMENT 

EPFLAG...SKIP IF 4 ELEMENTS PROCESSED 

FTP10 PROCESS ANOTHER ELEMENT 

SB 

i 00 0 OB-4 
68 

- —pc—TO PAGE"' LEVEE"" - —•—— 

FCPAGELV 

7 GET THE PAGE NUMBER 

, . ; . : . - . -.. . : . - . -. 

GIVEPAGE RETURN TO THE SCHEOULR WITH... 

-...--- THE.PAGE.ALREADY.FREE ED..- 

-20 SKIP IF EVERYTHING IS OK 

CS'CTO— —..—-"MAKE-MORE FILE.CORE SLOCKS.. 








































u 

q 2 

d 1 

i o 

■o. 

o 8 

o s 

o' 

a 


o 




































02312. 

02313 
02314 
-0-2*3±5- 
02316 
02317 
"0232 T 
0 2321 
_0-2.32'2~ 
02323 
02324 


.1.3-0-0-0-0-1-1-- 
53420034 
20302257 
■2100 2303' 
00 777777 
20 001334 

¥0 0 0 3334'. 

77740000 

- 142 - 000-37 . 

14604G0G 

77644140 


m 


02346 
02347 
0 2350 
02351 


.0 23 46 

47303323 
14110 0 40 
47102352 
47102355 


&' . 
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USER SWITCHING 


.„..(D 


0 225 0 
02251 

14302031 

14677777 

x.... 

X 

2012 

2013 

...? n 1 3 +n n 1 . 

RUN IDLE 

ENI 

ENA 

.TF."sT.fl.-T 

I OLE,X3 + PSA 
IQUANTUM 

.Ki F.- ft-..G O T O.F T A T... 



CD 

02252 

02253 

47303331 

1410G00Q 

P 

2013+002 

2013+003 


STI 

ENI 

X TEMP,X3 + PSA 

0 ,X1 

SAVE THE PSA POINTER 

~Q 

__ , ... . f;,» 

Q 

U 2254 “ 

01002256 

P.......' 

.2013+004 

2013+005 

2013+006 

. STAT 

UUP 

IF 

RMSW5.0 

STAT NE 0, UJP 

RMSW9 

... 0,0 


..0-2 ,2.KS . 

. 4 ... 4 ..B.Z. 7 ..Z. 7 . 7 .. 

.x.... 

.2015. 

201b 

.....pni 7.... 

* 

.RMS. 

LOOP TO 

FN A. 

GIVE QUANTA TO ALL 
...Y OU A N TI) M.... 

USERS. 

.US FR S.QJJANTliM........ 


O 

02256 

02256 

31301745 

p 

X 

2017+001 

201 e 

RMSW5.0 

EQU 

S3 A 

TIHELEFT,X3+PSA 


-Q 

O . 

0225 7 
02260 
02261 

34302256 
30377777 
40302260 

X 

X 

X 

....2019. 

2020 

2021 


RAO 

ADA 

STA 

TIMELEFT,X3+PSA 
TOTALTIM,X3+PSA 
TOTALTIM,X3+PSA 

GIVE US ER A NO T HER Q UANTU M. 

CHARGE HIM FOR IT. 

........ eG 


...0226 2 

0 2263 

2137777/ 
03702277 
. P4\.X7-7-7..7-7-.. 

X.~.*.~ 

p 

_y....—.~. 

.20 22 : .'. 

2023 

.....9 ft O/........ 


XD1I.’. 

AQJ,LI 

...j.r>.A..... 

T RUNTIME,X3+PS A 
RMSW6 

__nMOT)nF.-X3 + OF ft. 

JUMP IF NOT OUT OF TIME 

. O H F O F F O R ANY P F N O T N O O M R F O U F F T F.- _ 


O 

.... 

02265 

02266 

03102270 
146 77777 

P 

X 

C W G. *t 

2025 

2026 


km W rt 

AZJ,NE 

ENA 

-4 1 XJ U* § A, w * i J M 

* + 3 

TIMECUT 

JUMP IF A REQUEST EXISTS 

ENTER A TIMECUT REQUEST 

O 

.. „ .01 

o.... 

0 22b / 

0 227 0 
02271 

4 0 ou 2 2 64 
14477777 
37301776 

.x . 

X 

X 

-2 J 2 / 

20 28 

2029 


S } ii.-.. 

ENA, S 

LP A 

C rIG ODE f Xo^PS A 

NTBITS 

I030UND,X3+PSA 

ALLOW CERTAIN I/O BOUND JOBS 

TO PROCEED 

..uO 


.02272. 

02273 
.._0 2274 

"~tT3 T’0'2277. 

20300777 
-0-3-30-22-7-7. 

P 

X 

p_ 

.2030. 

20 31 

....20-32-___ 


~KZJ7m~ 

LOA 

-A2.J...LT . 

RMSW6 

SYSCM,X3+PSA 
....._RMSW6_...... 

IGNORE TIME CUT IF IN 

_CO-N-T-R-O-L.MODE._______-.1______. 

...:.. % | 

O ' 

02275 

0 2276 

14602266 

00702451 

X 

p 

2033 

2034 


“ fin ■ 9 W 1 

ENA 

RTJ 

TIMECUT 

CMQSET 

SAY /TIME CUT/ 

GO TO SCARE THE USER. 

O 

o _ 

U 2 ill 
02300 

.02301. 

^0 313 eOflb 
53700000 
.01002306 

p.. 

-2*0*313- 

2036 

20 37 

RMS Wo 

"LXA” -— 

TAX 

.UUP. 

0,X3+PSA 

X3+PSA 

RMSW2 

POINTTO THE NhXT UScR. 

...:..... 0 


0 230 2 

00 00 0 000 


20 38 

2039 

_2.0-40_ 

IMPURE0 2 

VFO 

■ A24/IMPURE 

EVEN PARITY WORD FOR REGION 02 


O ~ 

02303 

02304 

01001705 
54303331 

p 

2041 

20 42 

TIMEUP 

RMSW1 

.VFD~ 

LOI 

06/01,03/0,A15/RMTINEUP REQUEST NUMBER, INTERRUPT AD 

XTEMP,X3 + PSA GET 1ST USER_HEFGUND_0UT OF TIME 

0 

o _ 

u 2o05 
02306 
02307 

■'"5 3 io Q 0 *0 3 
02502255 
54303331 

p 

p 

€04*3 .*■*•- 

20 44 

20 45 

RMSH2 

TMI 

IJO 

LOI 

N U , A X 

RMSW5,XI 

XTEMP,X3+PSA 

.bti. 1 fit NonsCT ur-.uatKi.. 

LOOP THROUGH ALL THE USERS. 

RUN THAT SAME 1ST TIMELESS USER. 

... 0 


.023TiT 

02311 

.2T3 77777 . 

5330 G 000 

X 

2046 

204? 

RM3WB. 

CDS 

TIA 

TERMINAL,X3+PSA 
X3+PSA 

LOAD THE TERMINAL NUMBER 



-2040 

2049 

2050 
-20-51* 

2052 
20 5 3 
"2TT5T 
20 55 
-205-6- 
20 57 


-R-HS-W9- 


-S-H-A-Q- 

TAH 

LOA 

ir&Q— 
RTJ 
LO' A 


-9--- 

3 48 

TIHELEFT,X3+PSA 

■TiMEUP 

TIHSET 

8IT2 3 

.XFLAG 

A12/HINT 

-NPU-- 1 -J-X 2 -—- 

4 0008 
PS+PFW, X2 


RF34 POINTS TO THE RUNNING USER. 
LOAD THE TIME HE HAS LEFT. 

"GET.R EQ UES'T N Grr" RET U RN AO 0RES S. 

ASK FOR AN INTERRUPT. 

REMEMBER THAT WE HAVE MADE AN 
'TNTERWPTH?ESWST";. 


INITIALIZE 


USERS' PAGE FILE 


2091. 

2092 

2093 

2094 

2095 


.RMLJANC 

RHPACKRF 


r 

RPSAPTR,X3+PSA 
100408,XI 

RMPFOl,XI. 

RMPF 0 2, XI 


SAVE THE NEW PSA POINTER 
15 BITS OF TMG 40B 



—0-232-5“ 

— 0 260 232 4 

~P—*—— 

2 3 59 

-—“ •' * IJO. 

- *-»±TX2 

LCCP UNTIL DONE 



02326 

•53300008 


2 0 6 0 

TIA 

X 3+PSA 



0 .. 

02327 

36003323 

P 

20 81 

SC A 

RPSAPTR 

ARE WE CONTINLING THE LAST USER. 



...0233 0. 

.0'3T0~2"3T4’ 

T. 

. £ J G 2 " 

AZ’J, EQ 

.CHCHEK. 

CHECK FOR CONTROL MCOE 






2 0 63 

. 2 0 6 H 

¥ 


BEFORE STARTING TO RUN HIM, 


0 ’““ 




2065 

WE ARE REALLY 

SWITCHING USERS. 

SAVE THE REMAINING REGISTERS OF 






20 66 

THE PREVIOUS 

USER . 



10 

■02331 

-5530 U 00 G 


cj 6 ? ■ - 



SAVE HIS“ E REGISTER. 

..- *.... 


02332 

54203323 

p 

2068 

LDI 

RPSAPTR,X2 



O 

0 2333 

452 7777? 

X 

23 69 

STAG 

_E ,X2 + PSA_._ 



rj 

..02334. 

.776700QQ. 


..... 2 0 7 ii. 

OSA 


..GET.HI S.I SR.A ND.Q SR . .... 



02335 

13077774 


2071. 

SHAQ 

-3 




.02336. 

.77674000. 


.... ....2.0-72. 

_______.is. A_ 




O. 

02337 

13077774 


2 073 

SHAQ 

.-3. 




02340 

20201253 

X 

2074 

LOA 

IS,X2+PSA 



? 

.0 2 341.. 

-12G77771 


____._ 2 -Q. 7 - 5 ~—~ 

-_*—.SHA. 

--_ 




02342 

13000006 


2076 

SHAQ 

6 



O- 

02343 

40202340 

X 

2077 

STA 

IS,X2+PSA 

SAVE THE MODIFIED INTERNAL STATUS 


. ’if 

0 2344 

200/7777 

.X. 

. 2DT3 ~ 

LD A 

.BDPCR.." 

. GET.BCR.FRO H .INTSORT......■.: 



02345" 

40277777 

X 

2079 

STA 

BCR,X2+PSA 




o 


o 
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02352...53.01GG4Q 

02353 41277777 X 

.02354.21302353 X 

02355 53410040 

02356 15300001 

02357 10 110 077 

02360 02202350 P 

02361 54303323 P 

02362 .20 377777.X 

02363 53420026 

.02364.25 30 2 333.X 

02365 5570 0000 

02366 20302345 X 

02367 40002344 X 

02370 20302343 X 

02371 77660000 

0 237 2 .12 077774 . 

02373 77664000 

02374.2030 2271 X 

02375 03301260 X 

02376 21302267 X 

02377 05 50 0000.. 

02400 01077777 X 

02401 01002375 X 



USER SWITCHING 


4G3 +IMPURE . : .SAVE iHE.LAST.USERS.REGISTER.FILE 

RF X 2 + PSA 

.R F» X3+RSA..PU T.THE.NEXT. U SERS RF AREA. 

4 03+IMPURE INTO THE REGISTER FILE 

1X3 

100776> XI LOOP THROUGH RF 7 7 

R MPAC KRF}X2 

RPSAPTR» X3+PSA RESTORE PSA POINTER 

.ACCNUN,X3+PSA. 

268 PUT THE JOB NUMBER INTO RF26. 

.E ,X3 + PSA.-..-— ..- -., 

BCR,X3+PSA 

3DPCR.REST ORE THE 8 CR IN I NT SO R T.— 

IS X3+PSA 

. *._._.... REST O RE . THE (I SR) AND .CO SRI.. 


103 O U NO,X 3+ P S A.NEGATED USERS- ARE NOT TO BE - 

RETURN PUT INTO CONTROL MODE. 

CMCODE,X3+PSA CHECK FOR REQUEST TO ENTER C.M. 

0 - ......SKIP IF NO RECUEST. .. 

QCONTROL EXIT TO ENTER CONTROL MODE 

RETURN RUN THE USER 
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FILE CORE-BLOCK MANAGEMENT 




O 




..2124. 

2125 

2126 

a ... :. 




..212*7.. 

212 8 
2129 


..0240 2. 

47302450 

-.p .. 

2131 

-. 2-1-32. 

i o 

02403 

02404 

not. n.c 

53200066 

12000002 


2133 

2134 

o . 

U 2 4U 9 

02406 

02407 

40 !J u O o 9 9 
14100003 
14300002 


2136 

213 7 


0 2410 
02411 
. 0-241-2. 

0 0 7 0 310 4 
44201763 
. 2-O-.043-2-2-2-5. 

P 

X 

.x. 

..."2X315 . 

2139 

... 2-1-4-0—..- 

O ■ 

o _._. 

02413 

02414 

0 2415 
02416 
02417 

47302412 
35002317 
“40 30*0 O'0 0" 
20003355 
53140000 

X 

X 

p 

2141 

2142 

* 2143 ' 

214 4 
2145 


..” 0 24"20""“" 

02421 
_.0 2422. 

""I"2'0'0"0'aT7"’ 

14577777 

.45 30-00 02- 


21 4 6 

214? 

. 24-4.g. 

O .. ~ 

0 2 42 3 
02424 

n o j. o r 

14300003 

Q0703104 

p 

2149 

2150 

o a r* 4 

o ^. 

0 c 4 2 b 
02426 
02427 

40800000 

35001527 

40477777 

X 

X 

2151 

2152 

2153 


. 0"2¥3"0'" 

02431 
.. 0-2432 . 

.14677777 

40377777 
. . 2-0-00-3 3 55 . 

"X. 

X 

p ...... 

2154 

2155 

.. 2156 __ 

a 

02433 

02434 

53140000 
12 00 0011 


2157 

2158 

o ... 

UZhoo 

02436 

0 2437 

40 oil flr ' 

02502407 

14677777 

x. 

p 

X 

. 2159 . 

2160 

2161 


.'TTEWtT" 

02441 
.. 02442 . 

"3 5"0’’0I71"3" 
40002440 
_47Lfl n 3.3 5„5 . 

X 

X 

P .:. 

2162 

2163 

.„ ; „.. p i A.ii 

O . 

02443 

02444 

^ f U XJ vtfror 

14600000 

40003350 

p 

2165 

2166 

, . .. 4 r “3 

o . 

.. u 

02446 

02447 

5 8 02 u U 0 & 
15400004 
53420006 


dlb / 
2168 
2169 


.1T2 WQ"'"" 

*.Tmnnnnro. 


. .2T7I 




GTG12 


¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥•¥¥¥¥¥¥¥¥¥•¥■¥¥¥¥¥¥¥¥¥■»'¥¥¥¥•¥¥¥¥■¥¥¥¥¥¥¥¥ -If- ¥ 

THISGETSCALLEDBYSCHEDULERAFTERITHASFOUNDAPAGE * 

TO BE CONVERTED TO FILE CORE BLOCKS. * 

““ — — v*?' —V* - — -. ... ’! . *-*•' ¥ 

THIS USES TEMP6 TO SAVE ITS RETURN ADDRESS * 

♦ 

¥¥ *¥¥¥¥* Iff ¥'¥’¥ ¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥ ¥¥¥•»¥ ¥ ¥¥*¥¥¥¥¥ 


GTC13 


"STGT4T 


.STI. 

TIA 

SHA 

' ST A. 

ENI 

ENI 

: .RTJ. 

SWA 

~ LOA. 

STI 
SSA 
-'STA • 
LOA 

_AJA_. 

SHA 

ENQ, S 

.STAG. 

ENI 

RTJ 

■.STA. 

SSA 
STA, I 

“EFTS'. 

STA 

-.LOA- 

AIA 

SHA 

. STA. 

I JO 


STA 

.ST-I. 

ENA 
STA 
TMA 
INA,S 
TAM ■ 

Q-Jp. 


.-G TC14 , X3..- - S A VE T HE RETU R N A DDRESS.:. 

X2 GLG3AL PAGE NUMBER TO A. 

2 CHANGE TO 1/4 PAGE NUMBER 

REQPAGE.• SAVE THE ADDRESS AND CLEAR THE 

3,XI SWAP REQUEST BIT 4 1/4 PAGES 

2 »X3 GO GET A FOUR WORD BLOCK 

.GET MEN.’.......'....". 

PAGETA8L,X2 USE PAGETA8L FOR FCLIST POINTER 

--F-CL-I-ST-..INSERT.THE.1/4.PAGE.INTO.THE. 

FCLIST,X3 FCLIST 

IOP SAY I/O IN PROGRESS 

0X3 

REQPAGE GET THE 1/4 PAGE ACCESS OF THIS 

XI FILE CORE BLOCK 

.i'5".............~.“ 

77777B SAY NO INFORMATION PRESENT 

.FCA,X3..-.-.. 

3,X3 GET 8 WORDS FOR A COMPLETION BLOC 

GETMEM 

Q ,X3......trNK' -THE ELEMENT INTO THE MASS. 

BIT17 STORAGE COMPLETION QUEUE 

MSCPTR 

.RANT.".SET.THE.MK.FM~"IS<T'~ 

MXQCOM,X3 

.REQPAGE.-.GET.THE-.PAGE-.NUMBER---- 

XI FORM THE 1/4 PAGE NUMBER 

9 

-M'XQQyX3 .PUT' IT' INTO THE.BLOCK.. 

GTC13,Xi LOOP FOR 4 1/4 PAGES 

MSB IT 

""FLAGS.;."... . 

FLAGS 

-R-E-QP-A-G-I-rQ-...AL-L-O-W.ANOTHER .CONVERSION 


"SET.THE.RETURN . FM""WS(T 


"'PUT' IT ' INTO "THE. BLOCK ... 

LOOP FOR 4 1/4 PAGES 


FCPAGELV 
6 9 
4 

6 B 

"IMPURE. 


-AL-L-O-W.A-NOT-HER.C-ON-VERS-ION- 

RESET PC TO PAGE LEVEL 

RETURN .... 


o 


o 
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o 


o 


o 


o 


o 


o 


o 


a 


o 


o 9 

O' 

o e 

o 5 

A * 

Q, 

O'" 


02462 01000000 

0 2463 35302374-X- 

02464 40302463 X 

02465 01Q02462 P 


02466 01000000 

02067 37302464 X 

02470 4 0-30 *2'4 6 7.X 

02471 01002466 P 


SCHEDULR 


.0 






2174 

..2175. 

* 

. * .. 

ROUTINE 

C MQ SET. 

ENTER WITH ERROR CODE.FOR 

* 

.#.:. 




* 




2176 

2177 

* 

* 



1- IN I L» l\ “» X 1 1 t tv f\ vj iv w U i U ix 

CONTROL MODE IN THE A REGISTER 
ANO THE PSA POINTER IN X3. 

* 




Cl . 




2178 

2180 

** if if if *ifif if if if if if i<, if if * if if if Jf if if if if if if >f if if if if if if if if if if if if if * if if if if if if if if if if if if if if if If if if Sf If if if if if If 





02451 

02452 

.0 245 3. 

01000000 
21302376 
.3 5 00 2 414 

X 

x. 

.2181. 

2182 

....218 3. 

CMQSET 

UJP 

LOQ 

.SS A. 

IMPURE 

CMCODE,X3+PSA 
.8 IT23.-.- 






o 

02454 

02455 

05500000 

03702457 

p 

.. \y .... .......... 

2184 

2185 


QSG,S 

AQJ,LT 

0 

* +2 

SKIP IF NOT ALREADY ENTERING CM 
JUMP IF A LOWER PRIORITY COOE 





o. 

****""“' 0 2 456. 

02457 

0 2 460 

“40 30 2 452 

14477777 

00702466 

X 

X 

p 

. 2186 • 

2187 

2188 


ST A 

ENA» S 

RTJ 

C MCODE > X3+PS A. 

NIFWAIT 

IOCLEAR 

SAVE THE ERROR COOE 

CLEAR CMWAIT AND IFWAIT 

CLEAR ALL USER DELAY BITS 






0 2461 

~'“aTUU~245r' 

.p. 

2T8g . 


.ujp. 

.CMQSET..... 






o 

o _ 




.. 2192 

2.193 

2194 

•¥ * V * * * ¥•* WIMfM WIMMMf 

-1-—-~-—..-. - *~<r~ 

* ROUTINE IOSET ' ENTER WITH I0E0UND BITS IN THE * 

* A REGISTER AND THE PSA * 








.~.2X95. 

. 



POINTER IN X3. 

* 





2196 

" 2198 * 

2199 

.2*2 O'O™ 

2201 
22 G 2 


IQS ET 


UJP 
-SS-A" 
ST A 
UJP 


IMPURE 

T Q8QUNQ,X3'+ PSA 
1080UNO » X3+PSA 
IOSET 


220 5 
-Zttfr 
220 7 
2203 
.2EW 

-22X1. 

2212 

2213 

“2214 

2215 


* 

V- 

~w 


-ROUTINE.IOC LEAR 


ENTER “WITH THE 10BOUND' MASK 
IN THE A REGISTER AND 
THE PSA POINTER IN X3. 


* 

* 
* 
' * 


** *■» ****** ********************** ** ** **** * ************ ***************** 


IQGLEAR 


UJP 

LPA 

-ST"A~ 

UJP 


IMPURE 

1060UNO j X3+PSA 
■TGB0 UNDtX2+FS~A- 
IOCLEAR 


a 

eO 

s 

o 

1.0 

Ll 

o 

o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 









































SCHEDULR 


A SSE MBLER/0S3 Vi.O 09/21/74 2259 PAGE 41 


4 V- * AHjS'AHf'Af* V-V-y-’t- V-Z-y-y-it-W ArArAr* V- *~* W-I-V-W* X- * ^ Ar * ^ ^ ¥ A'-AfVV- V *AfVAf # ¥ AA^ VV- •¥■ V- V A - - ArV if. * V- A 1 






2219 

....._. 222 0 .-. 

¥ 

¥ 

ROUTINE 

.GIF ARN..-. 

TH T S PO tJT INF.C IF A RS THE. 

¥ 

.¥. 


CD 




2221 

2222 

¥ 

¥ 



10BOUND NEGATE BIT. X3 MUST 

BE THE PSA POINTER. 

¥ 

¥ 

.....„.....„„..... ■?? 

<3 . .. 




.2223. 

2225 

¥ ¥ ¥¥ ¥¥¥¥ ¥¥ ¥¥ ***.**¥¥*¥¥¥¥¥¥¥¥*¥¥¥¥¥¥¥¥¥ ¥¥ ¥¥ ¥ ¥ ¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥ 



02472 
.o 247 3. 

01000000 
.2130 2 45b 

.x. 

.2226. 

2227 

.2228. 

C LEARN 

UJP 

.ldq . 

IMPURE 

.CMGODE.X3 + PSA. 

.n 0 E S.THIS.U SE-R.H A NT.T O.B E.PUT. 



O • 

0 2474 

0 2 475 

14601711 

35002441 

X 

X 

2229 

2230 


ENA 

SS A 

SW3IT 

FLAGS 

INTO CONTROL H COE 



O 

0 2 4 /b 
02477 
02500 

Op 5u 0 0 0 0 
40 00 2475 
24002453 

X . 

X 

' " . 2 2 . 61 

2232 

2233 


I 4 S 6 « S 

STA 

EGA 

FLAGS 

BIT23 

SKIP IF HE DOES NOT 




.. 02501. 

02502 

^0TQ'Z4W 

01002472 

p 

p 

2234 

2235 


RTJ 

UJP 

TOOL EAR 

CLEARN 




O 






.*i^£...,it..lt....SL.,^£.,jML..M.....^£,.: 


. & aL at.st. at m 


.........o 

o ..._. 




223 8 

2239 

* 

¥ 

ROUTINE 

SET N 

THIS ROUTINE SETS THE I0B0UND 

¥ 

¥ 






2240 

2241 

¥ 

♦ 



NEGATED 8 IT. X3 MUST 8 E 

THE PSA POINTER. 

¥ 

¥ 

¥ 


O “.' 

02503 

01000000 

,.»y w . w ........ w . 

2244 

**************** ************************ » *■*'** ******** **■ 

SET N UJP IMPURE 


Q . ’' ' 

U 250 4 
02505 
02506 

2 0 002 6 00 
00702462 
01QQ25G3 

X 

p 

p 

.. 22 45. 

2246 

2247 


OJA 

RTJ 

UJP 

.SIIZS . . 

IGSET 

SETN 




9 9 L £ 

o 




2251 

¥¥ ¥* ¥¥¥¥ ¥■¥ ¥¥¥¥-¥¥ ¥¥* ¥¥¥¥¥¥¥¥¥¥*¥¥ ¥¥¥¥¥ ¥ ¥•'¥ ¥¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ * ¥¥ ¥■ ¥ ¥ * V ¥¥■¥¥ ¥ ¥¥ ¥¥¥■ ¥ ¥ ¥ ¥ ¥¥ ¥ 

¥ ¥ 


o .... 




. dZhd 

2 2 5 3 

2254 

¥ 

4 

inx3 kuotxwc: keitovcs r rifi 
RETURNS HIS PSA TO THE FREE 

rwrr me. scrttuuicK yutot.wrru 

STORAGE LIST. 

¥ 

¥ 







# ¥ 4 ¥ * * ¥¥ ¥ ¥ •¥ ¥ ¥-¥ ¥¥¥ ¥ ¥¥¥¥ ¥ ¥¥ ¥ ¥ * ¥ ¥ 

¥¥■¥¥¥¥¥¥¥¥¥¥¥¥ ¥¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥¥-¥¥•¥¥¥¥¥¥¥¥¥¥ ¥ 




. ,3 .. 2J5 ,|j 7 . .. 

,p.■. 

d c t> b 

. PPbntOOl 

..f QG-G££~ - 

PQU 

¥ 




o 

02507 

02510 

77730000 

00702734 

p 

2259 

2260 


VFD 

RTJ 

1 Tr , riT .. rrTri ,.p?,fc.| v rp__^_ 

A12/DINT 

DESTRUCT 

GO TO DESTROY THE PSA. 



o. 

0 2511 
02512 
02513 

1430 2 2 PU 
54203323 

C1 0 0 2 3 4 6 

p 

■ p 

cdbl 

9 9 a 9 

£* C O C 

O 9 CL *2 
£. c O 3 

..TTO'Lbr'-' • 

EN I 

LDI 

UJP 

£ i;L Hi X ,5 4 r o 4 

RPSAPTR,X2+PSA 

RHLJANC 

RUN lute ID UtT TMINUS SETTLt. 
STORE THE REGISTER FILE 

INTO THE PSA JUST FREED 




o 

Q,. 


d 

o 
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SCHEDULR 


CD 

a: 


(35 

0 0 000 


0 0 0 01 


..... o . o 0 0 2 .. 

o ■ 

0Q003 

0 0 0 0 4 

Q 

0 G 0 06 

. . ; .. . 0 0 010 .. 

0 0 011 

n n o i ? 

o 

0 0013 

0 0 013 

(3 

0 0 015 

0 0016 

. 0 0 "O'17 . 

0 0020 
n no ?i 

.-..—---—.. y ... 

O 

-. UUVCC . 

00023 

0 0 G 24 


O 

00024 


O ... 00025 

00026 

O ~.00027 



**.**•<?■ ** * * ** * * ¥■*¥.**. * * * -¥■**■ ?JMf 

* 


UW3LCCK BLOCK DEFINITIONS 


0 

CGNBLOCK+1 

.3FPTR + 1.----- 

BLKPOS+1 

IMAOR +1 

C ALLBAD + 2 

RDIST+2.. 

WCNT + 1 

- G BLOCK+i. 

TIHAD+1 

PSALOC 

PSALOC+2 
EXITAOD+l 

pfsave+t. 

UWBWC+1 
.UWBWC+2.— 


UW3X3 + 1""". 

BATCHPNT+1 

DESTLP+1 


POINTER TC 8 WORD CONTROL BLOCK * 
POINTERTCCURRENTCOREBUFFER* 
-0 IF NO BUFFER PRESENT * 

CURRENT BLOCK POSITION.-.-.* 

ADDRESS OF WCRD COUNT AND IMAGE * 
CALL BACK ADDRESS * 

" RT J.MAC H E R r—————--* 

ENI BLOCK,CBI * 

UJP IMPURE *.. * 

TEMPORARYWGRO COUNT * 

ADDRESS OF CURRENT BLOCK * 

TEMP ORA RY FOR CURRENT P O SITION * 
ADDRESS OF ASSOCIATED PSA * 

8 UFFER UNSAFE FLAG * 

~ENI' BLOCK,CBI .* 

UJP IMPURE RETURN AOORESS * 

TEMP TO SAVE THE CONTENTS OF PF1* 

"TEMP.TO.S'A V E.W'C.AND.C A LX'"" BACK.* 

ADDRESS IF CALL TO UW 8 LGCKB * 

-TEMP -T-0 S A V E R E TU RN A CORES S IF * 
CALL TC UW8L0CKE * 

BIT23 IF LAST RECORD WAS [LOGOFF* 
POINTER TO THE” PROPER BATCH Q * 

DESTINATION LINE PRINTER CODE * 

NUMBER OF WORDS IN BLOCK * 

.■.......-.T 


-_---THE.FOLLOWING.ARE.USED 0NLY.FOR * 

DEVICES THAT COME FROM THE POP 8 * 
UWMAX BIT23 SEZZ EXPECTING DATA * 

---—---eus T4---Q ■RAVE -6 4 WORD' -BLOCK- 

ADDRESS 

EXPDATA+1 12 BIT BYTES WITH THE CONTROL 

~ ■ . B L O C K I RFC R HATTON".'. 

C OHWORD+ 1 BITS 14—0 HAVE UW3L0CK ROUTINE * 

.- -.POINTER—.- - _ - *- 

DEVTYPE+i NUMBER OF WORDS IN LONGER BLOCKS* 

4 

AA * # * *^***> ** Jf * **+ 







































N3ATCHQ»X1 

6 IT 17. 

B III 7 
BATCHQ»2 
CHCHKRTN 
QTA3LE,XI . 
CRBAT01 

CRBATAFS, 0. 

1+IMPURE , XI 

CHCHKRTN.-. 

8 ATCHQ, XI 

CR3AT01A 

NTAPEQ 


TAPESAVL " 
CRBAT 01 
4- 

-0 

C R3AT APS 
•Q NUMBER, X'l™ 
NBATPSA,XI 
0 

-J77TTQ 
BATCHPSA,1 

CHCHKRTN...- 

8 ATCH NUH, XI 
CHCHKRTN,X2 

C RE'AT'E..~ 

IMPURE 
IAPESAVL 


NUMBER OF BATCH QUEUES 
BIT17SEZTHEQUEUEIS... 
...NOT EMPTY 

SEARCH FOR NON-EMPTY QUEUE 
RETURN 

NUMBER OF PSA LEGAL 
JUMP IF LIMIT REACHED 

SET.TAPES.TO.ZERO. 

ZERO IF NIGHT QUEUE CAN RUN 


LOG IN IF NOT TAPE QUEUE 
PREPARE PCR TAPESCHEDULING 
POINT INTC THE EATCHQ 


JUMP IF CANNOT LOG IN 


SAVE REQUESTED TAPES 
SAVE QUEUE NUMBER' ~ 
NOW LOCK FOR A PSA 


-NO.BATC H.PS ATS,.R ET UR N. 

POINT TO THE BATCH QUEUES 
ENTER REJECT ADDRESS 
CREATE A PSA 
GET TAPES REQUESTED 
SAY TAPES IN USE 


-U-TAP-EH AX-»~X3-*FS-A- 
CR3AT02,X3+PSA 
8IT19 

5YSC00E,X3*PSA 
1, X3 

GET HEM._ . 


QTABLE,XI . 

BATCHQ, XI 
X2+CNBLK 

•-15. 

05/il, A9/1Q0, A3/HH 


IMPURE,X3+PSA 
LUNL1ST,X3+PS.A 

7 7 7 7 7 a 

ACCWORD,X2+CN8LK 
* +2 

XCGST'UFF7X"3TPS'A.'. 

LP,X2+CN8LK 

• C 8P X 2+-C N-B L K-- 

Q 

CPP,X2+CN8LK 
5 IT-2 3 

0 ,X2+CNBLK 
SATCHQ,XI. 

B IT2 3 

BAT C HQ,-XI.... 

23-17 
CRBAT04 
3 ATCHQ 
XI 

8 ATCHQ,XI 

tt“.:..:..t..... 

2 4-6 

SELECT, X3+PSA.. 

E PP,X 2 + CNBLK 
XI 

M AXQEST,Xi 
CR3AT08 


-SE-T— USER-MAXIMUM TAPES 
SAVE THE PSA POINTER 
INDICATE A BATCH JOB 

IN SYSCCDE. 

GET 2 WORDS FOR LUNLIST 


BATCH 


.IE NUMBER 


REDUCE- PSA -LIMIT- 


BLOCK ADDRESS" TO Q.. • 

l ECHA LUN 100 = CR 
MERGE HARDWARE TYPE AND POINTER 
LUN TC HIGH A 
STORE LUNL1ST ELEMENT 

lUNLIST PC INTER TO A.-.- 

RESTORE THE PSA POINTER 


GET TASK FLAG 
JUMP IS A TASK 

ELSE 'CHARGE FOR.CARD'S".ROD. 

GET FILE LOAD POINT 
-SAY-.THIS.IS.CURRENT.-SLOCK.POINTER- 

ZERO CURRENT POSITION POINTER 

“37 77 77 7 78 * FOR REM CVING8 IT23 . 

REMOVE THE XTASK* BIT IF SET 

"SKTP""TF.NOT T APE Q .7 

REMEMBER THIS IS A TAPE QUEUE 

MA KE .U_ T-HXS .P C IN TER.-...-._ 

EXAMINE INDIRECT BIT 

JUMP IF POINTER WAS CORRECT 

EN D OF “CH AIN POINTER IS. . *. 

...GENERATED HERE 

QUEUE.NUMBER"....... . : . 

TO UPPER 6 BITS 

SET I HE Q U EUE NUMB £ R I NIC S E LE C T 
SET THE PSA PCINTER INTO THE 

SKIP IF CARDREACER NOT FINISHED 
JUMP IF INFO HERE - NOT IN MACRO 


o 
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Op. 

0 263253 30 C O 0 0 .2320 + 004.TIA 

02533 44100013 2320+005 SWA 

_ -..0 2 63 4.2 010 0 0 2 3..2 320 + 00 6. LD A 

(J 02635 17607777 2320+007 CR3AT08 ANA 

02636 12 0U 0014 2320 + 008 SHA 

0 2637 34377777 X 2320 + 009 RAO 

02640 0100 0 000 2325 CHCHKRTN UJP 

(J.. 2 ..:. 


o 


o 


o 


o 


o 


o 


o 

o 

o 

o 

o 

q 2 

d 1 

■ K) 

o g 

o 8 

o, 

o 5 

Ck 


o 


X3+PSA.PSA ADDRESS TC A. 

PSALOCj XI PLACE PSA POINTER INTO MACRO 

D ES T L P > X1. ,«'GET W H E RE T O G O F RO M M A C R O 

7 777 0 
12 

UDESTLP,X3 + PSA ."PLACE OESTTNATI ON LP IN PSA 

IMPURE ONE SECOND INTERRUPT RETURN 


. 0 ) 

: 'G 
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UHEDULR 


O' 

Cl 

o 

o 

o 

o 

o 

o 

o 

o 

o 

Q, 

i 

CT 

I o t: 

o s 

o“ 

'? \ 

o e . 

o 

33, 


02641 
02542 
0 2543 
0 2544 
02545 
02646 
02647 
0 265 0 

0 265 1 
02652 
0 265 3 
02654 
02655 
02656 
0 2 557 
0 266 0 

02661. 

02662 

02663 

02664 

02665 

02666- 

02567 

02670 

U2&7X' 


02641 P 
26003327 P 

63102651.P 

14300G03 
.4-2000001- 
30303401 
02702644 
■fltewtflt 
01002730 
02651 

T4T0W07'~ 

00703104 P 

..444-77777 .X 

1420017? 

15300200 


P 

P 

P 

P 


15377776 
40300000 
T2602656' 
47 30 2656 
.-5-30-2-0- 0-35- 
15600001 
53420035 
14600076 
40302370 
47302673 
T430G0S3 


X 


-.0270-3- 

02704 
02705 
02706 
0 2 707 
02710 
0 2711 
0 2712 
0 2713 
02714 
02715 
-0-2*71*6- 
0 2717 
02720 
02721 
02722 


4 o 30-2-31 a 
14677777 
0 0 70 245:1 
4710-2723 
14 70 0 3? 7 
14177777 

. 27002T2J 

13 60 0 017 
0.6 2 77..Z77... 


02723 
02724 
02725 
02726 
02727 
0 2730 
0 2731 
0 2732 
0 2733 


01002723 
12400011 
*53 300 00 0- 

44577777 X 
20102713 X 

.4T3' 0 '257T.X 

01002711 P 

. a.2.Z-.2..3-..-P.-. 

141000GO 
01000000 
■2 0 0 0-3-3-44--P' 
0-3 00 2641 P 
05102546 X 
0120 0 00 0 
17477767 

03102730 P. 

01002641 P 


2328 

.2329 .-. 

2329+001 
2329+002 
2329+003 
2329+004 
2 32 9+ 0 0 5 
2329+006 
2329+007 

.2 329+0 0 8 

2 33 0 

2332 

2332+001 
2332+002 
2 332 + 0 0 3^ 
2332+004 

....£-3.3.2+04-5... 

2332+006 
2332+007 
-2332+008 
2-332 + 009 
2332+010 
'”2"3'3”2'+0Tl - 
2338 

. 233-9 .-. 

2340 

2341 

2-342 . 

2343 

2344 

~2T45... 

2346 

2 3 47. 

2348 
2 3 49 

-2-3 5 0 - * 

2351 
2 35 2 
2 3 63 


¥ 

.CREATE-.-.-THIS ROUTINE GENERATES A PSA..—. 


.. 

* 

-¥•.. 

* 

* 

~>r~~ . 

jt . 

* * ** ¥ ¥ * •¥■ -* ¥ * -* ** *-¥-¥^*¥#*-*-*-¥¥#-»*¥-*¥*** *-* V V-V-V-* ■¥•* * ¥ -V- ¥ ¥ ¥ *» 

CR01 


ENI < ERROR R£TURN>»X2 

ENI TERMINAL, XI 

RTJ CREATE 

XI = TERMINAL 

.‘.X2.=.MANGLED. : . 

X3 = PSA POINTER 
.-.AQ.-MANGLED.-._..—.-. 


. 

* 

* 
* 

* . 

* 
* 
* 
* 
*. 


EQU 

LOA 

MEMARRAY 

GET BIT MAP OF 

FREE PAGES 

AZJjNE. 

ENI 

. GROTi... 

3, X 3 

..j.___-__:.. ..... 

.JUMP TF .FREE PI 

LOOK INTO FOUR 
Mm t t ci v a v ? 

VGE’S AVAILABLE. 

SIZES OF BLOCKS 

.. 

ADA 

IJO 

FRCNT+7,X3 
*-2,X 3 

AD DU P **128 + 256 +512+1024 BLOCKS 
LOOP TIL GONE 


...GR.0.11. 


'OR 0"2. 


UJP 

EQU 

TNT 
RTJ 
--S-WA- 
ENI 
INI 
L DA- 
INI 
S i A 
TOT 
STI 
--T-H-A- 
INA 
TAM 
ENA 
ST A 
STI 
"ENI" 


-2 
CR03 
* 

T»*X3. 

GETMEM 

P-S A 6 LK 5 X 1+3 LK. 

PSALNTH-1,X2 
PSALNTH,X3+PSA 

T DLE.X2... 

-1, X3+PSA 
0 ,X3 + PSA 

^CT0"2 r 7"X2. 

IDLE,X3 

-N-U- .-.-.-. 

1 

NU 
7 63 

IS»X3+PSA 
++3,X3+PSA 
. 3",X3. 


•SKIP IF AT LEAST 2 LEFT 
TAKE REJECT RETURN 

TETT .128.W 0 R D 6 L O'C K. 

GET THE 128 WORD BLOCK 

-SAVE.THE. POINTER . TO . THE .PSA 

COPY 1 HE PSA FRCM IDLE INTO 
FREE STORAGE 


THE 


LINK INTO THE PSA QUEUE 

-IN-0--I-C A T-I-C-N E.M-0 R E.USER . 

IN THE PSA QUEUE 


GSR 


GIVE THE USER LEGAL ISR, 

SAVE THE PSA POINTER 

GET 8 WORDS FOR THE ACCOUNTING 


02672 

00703104 P 

2 3 54 

RTJ 

GET HEM 

INFORMATION 


-0-2673. 

.1.4-3-0-0-30-0. 

.2-35-5. 

.-.-ENI.--. 

._I.MPURE-,.-X.3--+P-SA.- 

.-.RE ST-0 RE.THE.PSA.P-0-INTE-R-- 


0 267 4 

40302603 X 

2356 

STA 

ACCSTUFF»X3+P3A 



02675 

14600000 

2357 

ENA 

Q 

CLEAR THE IO BOUND WORD' 


0 2676 

40302273 X 

2358 

.STA. 

- S YSC M,X3 +PSA .- 

INDICATE NOT IN CONTROL 

MODE 'YET 

02677 

40302470 X 

2359 

STA 

I030UND,X3+PSA 



02700 

40702674 X . 

2 36 0 ' 

STA, I 

ACCSTUFF,X3+PSA 

CLEAR. THE CARO READER POINTER 

02701. 

. 53T0U OTTO... 

...2T6T"... 

HA¬ 

- a 1 + 3. L K 

. TERMINAL NUMBER TO A 


02702 

12000017 

2362 

SH A 

15 

SHIFT TO THE UPPER NIKE. 

SITS 


2-36-3- 


;T-A- 


:RM- I-N-A-L , X 3+ PS A 


-AND .SAVE 


X 

23 64 

ENA 

L CORED ' 

LOGON CODE FOR CONTROL MODE 

P 

2 3 6 3 

RTJ. 

C MQSET 


P 

■ '. 2'3S6. 

.-...*.STI-. 

- - GREAT XI, XI . 

' ' SA VE * TERhlNAL 'NfUMSE'R. * 


2 3 6 / 

ENQ 

3 773 

SET THE MASK 

X 

...2 368... 

HSITA8LP ENI 

HSIFA8L,X1 

SET TABLE LENGTH 

p . 

236 9 

.CRM EC... LDL 

. CREST XI... 

.FETCH' TERMINAL NUMBER LONLY 


2370 

SHAQ 

24-9 

UP TO TOP 

X. 

.... .2.37.1. 

..HSI.T.A8P.MEQ. 

.H.SITA8,2 - 

LOOK FOR IT 

P 

2372 

UJP 

CR04 

■ --- - -----.—.W-'i-'V"-.bAii. f- ......—.*..... . ..... 

EXIT DONE 


237 3 

SHQ 

9 

RESTORE. O 


-2374 

2375 

2376 

2377 

2378 
.-2.3.7-S-. 


2380 

2381 

2382 

2383 

2384 

2385 

2386 

2387 

2388 
23 8 9 


-G.R0....4- 


C RE AT XI 
CREATE 


CRQ3 


Tl'A 
SKA, 
LD A 
SWR . 

UJP 

-E.Q-U- 


X3+PSA 
HSILOC,XI 
H SIT AS,XI 
LUNLIST,X3+PSA. 

CRMEQ 

* 


ENI 
UJP 

“LD’A-':—“ 

AZJ,EQ 

ISG 

UJP.~ 

ANA,S 
AZJ, NE 
UJP 


I MPURE, XI 
IMPURE 

-INHIBIT.* 

CR01 

BATCHNUM,X1+3LK 

.0,X2 . 

-NOENDBIT 

CR03. 

CR 01 


GET PSA POINTER 
SET INTO MACRO 
FETCH LUNLIST POINTER 

AND SET.IN PSA. 

GO BACK FOR MORE 

"RESTORE.XI.WITH.TERMINAL.NUMBER 

TEST T HE . INH IBIT - WORD ... 

JUMP IF OK TO LOG IN. 

SKIP IF A BATGH JOB 

OTHERWISE,.FORGET.IT.*. — .. 

IGNORE END MODE BIT 

INHIBIT.—..:.-. 

TRY TO CREATE THE PSA 


o 
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.0 3027.. 

03027 

.ooooo.ooo. 

P 

.2488. 

2489 

.249 0. 

SWAP2 

EQU 

.VEQ 

(D ' 

03030 

0 3031 

0 30 32 
03033 

47 30 30 57 
54203027 

P 

P 

2491 

2492 


ST I 
LDI 

3 . 

152 If 7/5 
01001606 

P 

2 493 

2494 

2495 


INI 

UJP 


03034 
.03035. 

03034 
00000000 
.47 30 3 G 57. 

"P ■ 

.p.... 

2 49 6 
2497 

.2498. 

.SWAP PE 2 

EQU 
VFD 
.ST I 

O 

0 30 36 
03037 

54203034 

20200001 
jr I? *7 a n n n fi 

P 

2499 

2500 


LDI 
LD A 

o.. 

U oU A U 
03041 
03042 

t? o / u y u y u 
20300000 

0 3 20 30 44 

P 

... dbul 

2502 

25 0 3 


T AI 

LD A 
AZJ 


03043 

03044 

..0.3045. 

0 070 0131' 
24002614 
.40 304.0.0.0. 

x. 

X 

250 4 

250 5 

___254-6. 


.RTT 

LCA 
ST A 

O . * 

03046 

03047 

r.i:Sn c: n . 

20200002 

12077764 

C77 n n n <i n 


2507 

250 8 


LDA 

SHA 

o.._ 

uOIJy U 

03051 

0 3052 

y 0 f il tl U 'u u ' 

14600901 

34003335 

p_,_ 

2510 

2511 


1 A Jt 

ENA 

RAD 


. 0 3053~ 

0 3054 

14 60 0 000 
02601660 

P 

. 25X2.~. 

2513 


.ENA" 

IJD 


o 


o 

o 


o 


o 

q 

d 




Q, 

O' 



0 9/00 0,A15/IMPURE-ENTER—HERE ON SWAF-IN COMPLETION 

S WAPPC,X3 SAVE RETURN ADDRESS 

S WAP 2,X2 

'-■2, X2- . POINT X2 AT THE BLOCK —— 

SHAPERS4 PROCESS THE SWAP 


09/000,A15/IMPURE 

S WAPPC, X3 —— -SA VE RETURN ADDRESS ---- 

SWAPPE2 , X2 GET ADDRESS OF REQUEST BLOCK-5-1 

1, X2 GET POINTER TO VMM WORD 

X 3.... - . .....- .... 

0 ,X3 GET VMM WORD 

*+2 

MACHERR - .BAD. LIBRARY . TRTCFT.. ... 

3IT23 PARITY ERROR WORD 

0 ,X3 — ---ZAP THE—VMM WORD.- -.- 

2, X2 GET 16 BIT CORE ADDRESS 

-11 FORM PAGE NUMBER 

"X*3.-.- POINTER FOR PAGETABfc-- 

1 

FPCNT INDICATE ANOTHER FREE PAGE 

o. . . REiriTnEFnfffrTTmrr. : .~ 

S WAPER65,X2 


, 0 ) 

O 

,o 

°Q 

i.O 

Z l 

o 


o 

o 





.o 

o 

o 

o 

o 

o 

o 

o 


o 
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SCHEDULR 

.0 30 55 

0 3 0 55 

1 4 10 0 0-0 0 . 

P 

2515 

2516 

. .2 517 . 

SWAPEXIT 
S WAPX1. 

EQU 

FN I.... 

03056 

1430 0 0 00 


2518 

2519 

SWAPX3 

ENI 

0 ou5 7 

01 00 0 0 0 U 

0 3 0 5 7 

P 

. 2 52 0 . 

2521 

2522 

RMS WAP 
SWAPPC 

"UUP. 

ECU 

.0 306 0 

0 3 0 60 

14 &nnn 0 n . 

P 

2523 

2524 

.2525. 

SWAPER99 

SWARNUMR 

EQU 

SWAPNUMB 

PIMA .. . 

0 3061 
03062 

14700004 

03603055 

P 

2526 

252 7 


ENQ 

AQJ,GE 


03063 

P 

.252 8 .... 

2529 

2530 

SWAPER98 

'■r 

EQU 

QCOUNT 

.03063 

0 3G64 

_ 0 30 65. 

0560 0 000. 

01001404 
.run Q 3Q55. 

P 

p__ 

2531 

2532 

__ 253 3.... 

.QCOUNT.- 

ASG. 

UUP 

yjp ___ 




253 4 

2535 

* 








0306& . 

03067 
..0 307 0. 

'TTOIIW 
37001546 
.2.1-0 0-332.0- 

X 

p___ 

- .2537 . 

2538 

.....253 S.. 

.FRBKP’A'GE" 

UUP ~ 

LP A 

..LOQ_ 

03071 

03072 

03703066 

14200004 

P 

2540 

2541 

c r y. o 


AGJ,LT 

ENI 

UoO/o 

03074 

..iru. ( (f(7 ( . 

01003066 

x — 

P 

.2 54 2 

2543 


f\ 4 d 

UUP 


o 


! O 

I o 
o 
0 


Q, 

f A 

O' 

1 (.} 

o, 

I 

o 8 

o, 

o 5 


o 


IMPURE,XI 
IMPU RE» X 3 


IMPURE.——-— .ENTER ON LEVEL 1 TO START SWAPS 

RMSWAP 


IS THE NUMBER OF SWAPS IN PROGRESS. 

IMPURE----.-. 


SWAPEXIT 


MAX. NUMBER OF SIMOTANIOUS SWAPS 
EXIT, SWAPPER TOO 8USY 


IS THE NUMBER OF UNPROCESSED SWAP REQUESTS 

IMPURE...~... . “ . 

SWAPER10 START ANOTHER SWAP 

SWAPEXIT ......EXIT, A L L.R EQ U EST-S.A RE . 8-EI N G. ... 

...PROCESSED. 


IMPURE . OTg --- MCK -- ms . s --. ST0RAGE . PAGe 

VMMMASK MAKE A MASS STORAGE ADDRESS 

LI8LAD----LARGEST.LIBRARY.ADDRESS. 

FR3KPAGE NEVER FREE LIBRARY PAGES 

F BPP ,X2 INDICATE 4 FILE BLOCKS 

F'REE'StK —— 

FR8KPAGE 
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.2546. 

2547 

.2549 

2550 

—... 2561 

2552 

2553 

.".‘.2 554. 

2555 

--—..2 5 56. 

2558 


;CHE DU LR 


FREE STORAGE ROUTINES 


¥ » 

* ROUTINE TO GET A BLOCK OF FREE STORAGE, CALL WITH EASE TWO * 

* LOG OF.DESIRED BLOCK' LENGTH IN INDEX 3, AND' EXECUTE AN. * 

* RTJ GETHEM GET A BLOCK OF FREE STORAGE * 

* WITH THE INTERRUPTS DISABLED * 

* ...‘.RETURNS. WITH .THE ADDRESS OF.THE BLOCK IN. BOTH .INDEX.3.AND.* 

* THE A REGISTER * 

jt _____i_____________*_ 


o .. 

. 03075 

03076 

03077 

15477776 

40303372 

21303357 

P 

P 


25 59.. 

2560 

2561 

.GETMEH01 

-r n-ats— 

STA 

LDQ 

FRONT t X3 
FRPTR,X3 

——trT&RE'M’E’NT THE’ SCU'NT— --— —.—.*.~~ 

AND STORE IT BACK 

, LOAD THE ADDRESS OF THE BLOCK 


'03100'. 

0 3101 
. : . 0310 2 . 

20 703357 
44303357 
.-13...O-G-.G-0-3O-. 

P 

P 


2562 

2553 


L C A , 1 

SWA 

SH AQ 

FRPTR,X3 
FRPTRj X3 

. ?. 4 ....... 

LOAD THE ADDRESS FROM THE SLOCK 
, ADVANCE THE POINTER 

. P! QCK -ADDRESS . T 0 A .. ..... . . . . . 

o 

03103 

03104 

n n c 

53700000 

01000000 



... 

2565 

2566 

GET MEM0 2 
GET HEM 

TA1 

UJP 

X 0 

IMPURE 

PUT IT INTO INDEX 3 ALSO 

. n.ri...Y ~..4 ir". . 8 .rr...tr.n.&.rr. .rfc.fr..x mty .cr, , , , . , . , 

o . 

U O 1U 

03106 

03107 

Ml ouUul! 
20303372 
03103075 

P 

P 


iL ^ w t 

2568 

2569 


v r U 

LQA 

AZJ,NE 

A 12/ 0 IN 1 
FRONT,X3 
GETMEM01 

t-RLvhr<I lNlfcKrfcRhNLt 

LOAD THE COUNT OF FREE BLOCKS 

JUMP IF THERE ARE SOME OF THE 


03110 
.. , . 0 3111 

1470 0 0 01 
. 12-40-0-0.2 7- 



."2 r 57“0 . 

25 71 

. 257-2.. 

....~..~ 

.. G£~T~MEM&.3.. 

ENQ 

-SW.Q. 

1 

.. .2-3 .......... 

.REQUESTED" SIZE....... 

RLEVEL WILL. TELL WHEN TO QUIT 

. RECURSING ....... 

o 

03112 

03113 

41Q03330 

053Q0012 

P 


2573 

2574 

‘"i si* 1 tr 


STQ 

ISG 

RLEVEL 

10,X3 

SKIP IF A 2048 WORD SLOCK NEEDED 

o ... 

U ill 4 

03115 

ti i U O' O' 1 / D 

4710 3165 

P 

P 


C / D 

2 5 76 
2577 

+ * FIND A 

uJ'^ 

PAGE TO 
STI 

at 1 M t n 07 

USE FOR FREE 
GETHEMXi,XI 

STORAGE. 

SAVE INDEX 1 


0 3116 
03117 

. 0.3.12.0.... 

47203166 

14177777 

.2.5-Q..£L0..fl. 0.0.. 

P 

X 

,.,H . 


. ~Z5TS .. 

2579 

.-..25.8.0 . 


"STX . 

ENI 

-LOAD ..__ 

"'"""'G"tTH"hMX2",'X2" 
NUMPAGES,XI 
..VMM ASK 

- .SAVE.INDEX.2..... 

o 

0 3121 
03122 

ft 72 4 <7 ~2 

06102411 

00700117 

X 

X 

- v 


2581 

2532 


he a 

RTJ 

PAGETABL,X 1 

SYSERR 

SEARCH FOR P.C. OR FREE PAGES 
. NO FREE PAGES. 

o . 

uoid 3 

03124 

0 312 5 

2 a l b -5121 

5360 0000 
12077752 

X 


.ilSO. 

2584 

2 58 5 


LO A 

TAI 

SHA 

P Ab £. T A d L j a £ 
X 2 

-21 

......bE s PAGET ABL 'ENI R Y " FOR” THE ' PAGE....."............. ". 

SAVE PAGE ACCESS WORD POINTER 

LEAVE UPPER OCTAL DIGIT 


G 312 6 
03127 

. . 0.313 0 . 

0 3 00 3132" 
20101547 
.35 0 0 222 7 

p. 

X 

.X ... 


2 b 8 6 
258? 

. 2„5..8,8 . 


TnrJTEU ... 

LDA 

SS.A ..... 

6 ET M.E M3 G 1 

PAGEMSA 9 XI . 
.8..IX2-2 . ' . 

.JUMP IF FREE.PAGE... 

GET MASS STORAGE ADDRESS 

. .MAKE . INTO A P A GE . ACCESS ... WORD . 

O . 

03131 

40200000 

03132 

on n. n •* 3 > 4 o 

p 

v. 


2.58 9 
2590 

-"3 it .4 

GETHEM3 3 

S T A 

EQU 

0 ,X2 

* 

INDIGATE'PAGE IS ON'THE DISK 

o. 

.u oloc . 

03133 

0 3134 

2 u Ut! 31 26 
40103132 
20 003335 

A 

X 

.p_ 

' 

■ £351 

2592 
.259 3_ 


LuA 

STA 

LOA 

P Abt I A d L 

P AGET ABL,XI 
FRONT 

*“ btr 1 " S'Y b i t 'r A bt r LA b ■ - ...." 

FLAG THIS PAGE AS SYSTEM 


.tmr3‘5‘. 

03136 

.0.313.7. 

"T547T77F 

40003335 

.0.3-2.0-3.14-6-. 

p 

_R .... 


"” ijj"O ... 

2595 

_2.5.9 6 _..._ 


mrs 

STA 

A 3 J f GF_ 

. -1 . : 

FRONT 

G FTHFH34 _ 

.-.r;E' 0 "U"C'E. FREE.PAGE".COUNT.........:.. 

__JUMP.IF ST Til KORF PAGES... .............-....._ 

o ~ 

03140 

0 3141 

. .. n i f* z> . 

14600001 

35003314 

p ! 


259 7 

2 59 8 


ENA' 

SSA 

OTA , , 

FSWA no 

INHIBIT 

:r k ; j -r q t ‘T 

INDICATE FREE STORAGE WAIT. 

q 2 _ 

tj UlTt 

03143 

03144 

*4-U 

14677777 
35 GO 2477 

"■"T .-... .. " 

X 

X 


25GG 

2601 


1 m 

ENA 

SSA 

J: 

Fxeii 

FLAGS 

INDICATE IMMEDIATE CORRECTIVE... 

...ACTION TO GET AN AVAILABLE... 


. 0 3145"' 

. 0.314.6 ._ 

40 00 31 ^% 

0 314’ 6 
. 5.3...1.0....Q....Q...Q..Q . 

.X. 

p 


. 2602 . 

260 3 
. 26 0.4 

GET HEMS4 

"STA" .. 

EQU 

TT A .-_ 

FLAG S 

¥ 

_XI ____ 

...".FREE "OR SYSTEM PURE "PAGE........ 

GET THE PA OF NIJMRFR 

d 1 " 

o 8 _ 

03147 

03150 

03151 

03152 

03153 

00703251 

20003327 

05400001 

00703122 

13600026 

p 

p 

X 


250 5 

26 0 6 

-2 60 -7- - 

25 0 8 
2609 


RTJ 

LDA 

RTJ 

SC AQ 

PAGEZAP 

MEMARRAY 

—M-9-3T- — 

SYSERR 

22 ,X 2 

KILL THE PAGE IF CURRENTLY IN USE 

LOAD THE MEMORY ADDRESS ARRAY 

SKIP IF ADDRESSES ARE AVAILABLE - 

PAGE NUMBER 1C INDEX 2 

a .... 

.03154. 

0 315 5 

.. .0 315 6. 

.53T0WOF" 

12000002 
.77644.0.0.0 . 



2610 

2611 

.2.612 . 


TIA. 

SHA 

APF.... 

““XT " 

2 

. PE.W.X2. .. 

777768 

0 ,X2 

SHIFT FOR THE PAGE FILE 

o 

03157 

0 316 0 

f|,Xl (VI 

14477776 
12200000 
? 7 nn ^'<57 

p 


2613 

2614 


ENA»S 

SHA 

4,0 A 

GENERATE THE MASK FOR RESETTING 

» .. XU C. QTT., TM. .M-OV-A-DO AV . ^ »,», ** , 

o.. 

U OxO X 
03162 
03163 

40003327 

53200000 

r . 

p 


C O X J 
2616 
2617 

1 

trK 

STA 

TIA 

TT’tlTtft-KItHT ^ 

MEMARRAY 

X 2 

llltr oil IN ntnAKKA 1 

PAGE NUMBER TO A 


~ '0 3164 

03165 
.0 3166 

. 12""0'0:0 0T3" 

1410 Q 00 Q 
.1420 Q 0 0 0 . 



2618 

2619 

..2620 .. 

GET MEMX1 
.GET MEMX2 

SHA '. 

ENI 

ENI ... 

11 

IMPURE,XI 
IMPURE, X 2 

..CONVERT.TO.AN.ADDRESS..... r ~ r “ :. r T... 

RESTORE INDEX 1 

RESTORE INDEX 2 ..... . : ...... : ... 

O . 

03167 

. . n -? i 7 n 

0100 3202 

A c in A-fl fH . 

.p. 

> 

2621 

2622 


UJP 

G ET MEMO 9 

„ . , j^Li C r , -l/..*XU C . | | K'X»» A C JTvU £T , KI C V T _ C T *7 .. r-, .... r ,. 1: . _^ 

Q . 

u Oi. / U 

03171 

1a U u U U 1 

20303372 

p 


. c. be 0 . 

2624 

b tint ri U 7 

1 IN ± ~ 

LDA 

■ r 1 -, TO ,- T , ., rvjr - CT . r ,. x . 

1 9 A D* 

FRONT,X3 

. bn hb K..I nh tUUM ur. 1 Hh.N fcX 1 btZt 

LARGER BLOCKS 
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; a 

o 
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o 
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. 0 317 2. 03 003111.P ...... 2625 " 1 AZJ,EQ 

03173 15477776 2626 INA,S 

—- 0 3174 40303372 P..- - -2627— -----ST A- 

03175 20303357 P 2628 LDA 

03176 21703357 P 2629 LDQ,I 

0 2 j_- 7 7 —17 7 7 77 7 7 ——-——2 630 TVN-Q— 

03200 41303,357 P 2631 STQ 

03201 15377776 2632 INI 

.0 320 2.4400 3205.P. .2 63 3 GET MEMO 9 SWA 

03203 00703263 P 2634 RTJ 

^..0-3204.12300000.-...-.2635-—----SHA. 

03205 15600000 2636 INA 

03206 10003330 P 2637 SSH 

--—--——-—— 

03210 01003103 P 2639 UJP 


O 

o 

o 

o 

o 

o 


o 

Q 



O 


FREE STORAGE ROUTINES 


GET HE NO 3 

-1 

FRONT-, X3- 

F RP f R , X 3 
FRPTR,X3 
777778—— 
FRPTR, X3 

-1» X 3___ 

* +3 

FREEMEN 

0.,X3. 

IMPURE 
RLEV EL 
GETMEM09, X'3 
GET MEMO 2 


JUMPIFTHEREARENONE 
DECREMENT THE COUNT 

AND.STORE.IT.SACK---— 

LOAD THE ADDRESS OF THE BLOCK 
ADVANCE THE POINTER 


DECREASETHEBLOCKSIZE. 

SAVE THE ADDRESS OF THE BLOCK 

FREE HALF OF THE BLOCK 

SET.A.-.2.POWER INDEX.3—--— 


SKIP IF DONE 


RETURN 
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SCHEQULR 

FREE 

STORAGE ROUTINES 




03211 

.n ZPA ? . 

0 3 211 
14303214 

Cl 0 7 432 2 3 

P 

P 

,.p.:. 

2641 

2642 

.2 643. 

FSX 

EUU 

ENI 

. PT I... 

..*..;.......... 

FXAP•X3 

.n FTP A GF. 

COMPLETION ADDRESS 
.ST ART A.PAGE.f.CMM TNG IN. 



3 

0 3213 

01002401 

X 

2644 

2645 


UJP 

RETURN 




3 

03214 

0 3215 

0 3214- 
14500001 
40203133 

p. 

X 

2 646 

2647 

2 64 6 

FXA P 

EUU 

ENA 

STA 

... . ........ 

1 

P AGE T ABL,X2 

FREE STORAGE PAGE HAS ARRIVED 
INDICATE FREE PAGE 




.0 3216. 

03217 

..o 322 0 

34 003335 
20003314 
17 477 776 

.p.. 

p 

.2649. 

2650 

.2 651. 


.RAD. 

LD A 

, a,m A... S.-. 

“ F PCNT 

INHIBIT 

.NFS HA IT 3. 

INDICATE ONE MORE AVAILA BLE PAG£ 



o. 

03221 

03222 

40 003314 
01300000 

p 

2652 

2653 


STA 

UJP 

INHIBIT 

0 ,X3 

. . . EXPANTION INHIBIT BIT. 

RETURN 



o. 

0 322 3 

01000000 


2 65 4 

2655 

2656 

GETPAGE 

UJP 

.IMPURE. 





.0 322 4. 

0 322 7 
.0 3230. 

.7763 0 0 00 

47303245 

1 L. 3 il-G-0 

p 

2 657.. 

2658 

.GJ.Q.. 


DIN TO. 

STI 

..EMT.. 

G ETPX3,X3 

..2-. X3.-.■. 

SAVE RETURN ADDRESS 

.a c k .F O R.A.4 W G R H 91.0 fi K.... 



O .". 

03231 

03232 

....—\j fc-— 

00703104 

20003245 

P 

p 

.. J .... 

2660 

2661 


RTJ 

LD A 

T A 

GETMEM 

GETPX3 

N/ "2 , , , . 

'Mu n | W r% T *1 W fV y b V Vl H' 

OF FREE STORAGE 

GET RETURN ADDRESS, COMPLETION 



o. 

. U b do o 

03234 

03235 

A*U - 'Q *■ y ■ u ■ u ■■ tl d 

20 003325 
47303325 

p 

p 

. d DO d 

2 663 

2664 


LOA 

STI 

c $ X o 

RMSWAPQ 

R MS W A P Q, X 3 

PU i It Ik I ht FAbc Khu Utbi uLCt/K 
LINK IN THE PAGE REQUEST BLOCK 




.". 0 3236 

03237 
.0 3?4Q 

.WPTO. 

14600001 
34.003.06-3. 

P. 

. ZEE 5 . 

2666 

.2.6- 6- 7 . 


STA ~ 

ENA 

..rad.—. 

0,X3..“. 

1 

_QCOU NT__- 

. XN-DI'-C-AT-E-.ONE.M.Q-RE .PAGE. REQUEST. 



O “ 

o. 

03241 
03242 
03243- 
0 3244 

14677777 
35003145 
40 00 3 242- 
01003223 

X 

X 

”X~——————- 

p 

2668 

2669 

2 6 70 - 

2671 

2672 

_____ 

ENA 

SSA 

“S-TA— 

UJP 

SWAP8IT 

FLAGS 
—PL AGS 

GETPAGE 

INDICATE THAT SWAPPING SHOULD... 
...9E STARTED. 

IMMEDIATE RETURN 

___________ 

— — — 


JTSZW5 .4'0”00"0'0'0"0.“.*.~Z573 GETFXT TFD* ' Al7r,«S/0,fll5/IHPURh 


o 

03246 14604000 


2675 

PZP02 

ENA 

400QB 




o. 

“'“■'•■*“0"3'24 7 7/644140 • 

03250 14200000 


....~2'0 7 6 

2677 

267 S 

PAGEZX2 

SPF .. 

ENI 

PS+Pr W, *2 
IMPURE,X2 

RE HOvD, THE PAGE FRO pi THE • »o 
...RUNNING USER 




.03251.OTODOWO. 

. 0.3252.47.20 3250 P. 


.2&T9. 

268 0 

.26.81. 

.P'A’GTEZAF' 

UJP " 

.STI ._. 

.IMPURE. 

..PAGEZX2,X2.-. 

. . .SE ARC FI.A Pt'D.BE S TROY TH £.PAG E FIL E 

.SA ME .X2.._..... 



o 

03253 13000030 

0 3254 12 40 0 0 02 


2682 

2 68 3 


SHAQ 

SHQ 

24 

2 

PAGE NUMBER TO Q 

MAKE INTO A QUARTER PAGE NUMBER 



o .... 

U vJ d E O 1 T L U U Li W i 

03256 77654140 

03257 17&0Q774 


. r d oh ■ 

2685 

2686 

P.ZPOi 

cfrl 

PFA 

ANA 

N PU-1 f Xc 

PS+PFW,X2 

7 748 

SEAKLri ALL UbhKb PAGE PILE 

GET QUARTER PAGE NUMBER 

REMOVE THE PROTECT BIT 




.0 3260".Q"3"4IT3"2"9 5.P.. 

03261 0260325b P 

.0.326.2.01.0 0 32.51! P. 


. ZS1ST 

2 68 8 

.2:6.89. 


“wrarEcr 

IJD 

..LJ JR.... 

p 2pg2 

PZP01,X2 

.PAGF7X? . 

"JUMP "IF PAGE IN USE.... 

JUMP IF MORE USER PAGES 

...RF TU R N.......... 



O ~ : 


Q 2 

o* 



o s 


Q 


O 
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O 
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SCHEDULR 


FREE STORAGE ROUTINES 


03263 
03264 
0 3265 
03266 
03267 
03270 
0 3271 
0 3272 


0 327,3 
03274 
03275 
03276 
03277 


.2691 

2692 

2 694 
2695 

...*.....***2-69 6“ 

2 69 7 
269 8 

~ ' . : .".2699. 

-.. -...-.2701. 

01000000 2702 

77730000 2703 

2130 33”57~P——-————--2^0^- 

44 30 3 3 57 P 2705 

41703357 P 2706 

T'46FOOOT 2707“ 

34303372 P 2708 

01 0 0 3263—P-.—.270 9 

2710 

2711 

2712 


2714 

.27X5"' 

2716 

-2-7-1-7- 

271 8 
2719 
-2*720 

2721 

2722 


- 0 - 1 - 0 - 0 - 0 - 0 - 0 - 0 - 
21303357 
44303357 
4120 0000 
53100000 


2724 
-2-7 2 - 5 - 

2725 
2727 
2 72 8 
2729 


.4 4 44 444444 44 4 444 44 4 4 4 44 44 4 4 4 4 444 44444444 44 4 4 4 4 4 )f If??? 

4 4 

4 

. 4 .—.— 


4 

4 

4 


ROUTINE TO RETURN A BLOCK OF MEMORY TO THE FREE STORAGE LIST 
CALL WITH THE- BASE TWO LOG OF THE BLOCK SIZE IN INDEX 3 AND 
THE ADDRESS OF THE BLOCK IN THE A REGISTER AND EXECUTE AN 
RTJ FREEMEN RETURN THE BLOCK OF MEMORY 


44 44 4 44 4 4444 4 4 44 4 4 4 4 4 444444 44 4 44 4 4444444 4444444444444444444444444444444444 


FREEMEN 


UJP 

VFD 

-LOQ— 
SWA 
ST Q j I 


"ENA 

RAD 

~UUP~ 


IMPURE 
A 12/DINT 
F RPT R, X3 
FRPTR»X3 

FRPTR,X3 

.... —— . — . 


FRONT , X3 

•-F-RE-&M-EM-- 


PREVENT INTERFERENCE 
EGAO THE FREE STORAGE POINTER 
ADVANCE THE POINTER 
.LI.NK. THE.BLOCK .IN 

INCREMENT THE COUNTER 
■RE-TUR-N. 


¥ 

. ¥'";' 


■■ ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ *¥ ¥¥¥¥¥¥¥¥ 

¥ 


44 

¥ 


¥ 

¥ 


.RUOTXWE.TO "“RETURN .A.LlW'KED. LIST .OF.BLOCK'S “ TO.THE.FREE'" STORAGE" 

LIST o CALL WITH THE BASE TWO LOG OF THE BLOCK SIZE IN INDEX 

.THREE* THE FIRST AQ-QR-E-SS IN THE A REGISTER* AND THE ERRING 

BLOCK ADDRESS IN INDEX TWO* AND THE COUNT OF BLOCKS IN INDEX 
ONE * AND EXECUTE AN 

RTJ “ • * FREE OHM FREE THE LINKED LIST .- 

WITH THE INTERRUPTS DISABLED 


¥ 

.¥. 

¥ 
¥ 

¥ 
¥ 

.^4 4''¥¥¥'¥¥¥¥F¥¥Tf¥¥¥¥¥¥¥'¥¥'?T¥¥¥^'¥¥¥¥¥'¥¥¥'¥¥¥’¥'¥i''¥¥f”¥¥¥?¥¥¥¥¥'¥f¥¥¥¥¥¥. 


■ FREEC-HM- 


-UJP-- 

LDQ 

SWA 

•STQ' 

TIA 


-I-MP-U-RE- 

F RP T R j X 3 
F RPT R j X3 

0 j X2. 

XI 


03300 34303372 P 

2730 

RAD 

FRONT j X3 


.03301 01003273 P . 

27 31 

. ujp . 

F RE E C H N 
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02375 

2 734 

27 35 

...R.-7Xfi. 

SIM 0 2 

EQU 

03 30 2 

44254446 

2737 

2738 

RPARMSG 

BCD 

u v!) o X IJ 

5 4 54b U v)l 

0 0020 

2 / 08 +uOl 

273 8+002 
2738+003 

ILW ERM 
ILWERML 

BC O 
EQU, C 

03314 

00000000 

.0-0-0-04..-. 

2 73 9 

2740 

..... 2 . 7.44 ... 

INHIBIT 

.FSW ATTR . 

VFD 

cm.). 


0 00 02 

0 0 0 04 

2742 

2743 

GPI 6 IT 

DISKIBT 

EQU 

EQU 


(J 0 010 

0 0 020 

00 040 

......2 744 . 

2745 

2746 

■ NOENOBIT 
DIE 8 IT 
IRUNBIT 

EQU. 

EQU 

EQU 


0 0100 

00200 

.. 0 - 0 - 12-0 . 

.2747. 

274 £ 

.27-4-9. 

SUS SIT. 

RUNI 8 IT 
.Q..IEPSUS.... 

EQU". 

EQU 

,£Q (j. 


0 0 050 

, .. , 7777 c........ ... 

2 7 50 

2751 

. O 7 £T Q 

IRUNPEND 

EQU 

.r* n ; s 


f t ■ l ■£'■ D 

7 7775 

77773 

.. . C (DC .. 

2753 

2754 

N ro W'Alj d ■ 

N OP I BIT 
NOISKIBT 

fe,W U 
EQU 
EQU 

......0.331.5.. 

. 7 7 737 .. 

.00 0 77777... 

2 7 55 

2 7 56 

.... p .7.,. 5- 6 ..i...Q,.Q. -1-..... 

.RTRTTNBTT'' 

..‘LARES A-V-L... 

"EQU. 

VFO. 

03316 

0 3320 

. n . 

14300000 

0 0 00 0 0 00 

2757 

2758 

RMINCON 

LIBLAO 

OCT 

VFD 

U UUL 1 

03323 

uUuilUuuU 

03322 P 
00002662 

.2/59'"" ' ' 

2 76 0 

2761 

'1RTEMP1 ' 
IRTEMP2 
RPSAPTR 

~VPu".. 

EQU 

VFD 

0 332 4 
03325 

.....03326. 

00 00 0 00 0 

00 00 0 000 

QQ QQ 3326 ..... 

".. 276-2 

2763 

..2 764-—. 

.PRTTFSI. 

RMSWAPQ 
.P..T.S-WAPQ--- 

“VFD ‘ 
VFO 
...VFO — 

0 332 7 

0 333 0 

G 3331 

G 333 2 

00 oaoooo 

00 00 0 00 Q 

00 000000 

15544 P 

00 00 0080 

2 765 

2 766 

.■.-..2767.... 

2 ? 6 8 

2769 

MEM ARRAY 
RLEVEL 
XTEMP ■ 
OSRSAVE 
PARTEMP. 

VFD 
VFD 
VFD 
EQU, C 
VFD' 

.03334. 

0 333 5 

...0 333 6. 

.0TJ.OO'OIO'O. 

77777775 

.Q 0-0.00.0.0Q. 

. 2 770. 

2771 

. 2772 . 

/ r L A ■■./ 
FRONT 
.L11 f HP1. 

VFD 

VFD 

.....VF-Q. 

03340 

03337 P 
00000003 

2 773 - 

27 74 

L1TEMP2 

PAGEAGE 

EQU 

VFD 

.UOOHl. 

03342 

03343 

UUuUyUUu 

oiuooQoa 

00000000 

. . 1 ( ( b .. 

2 7 75 

2 777 

L UW V ALPN 
PVA LEXIT 
LSWAPUNT 

Vr U 
UJP 
VFD 

m ..0 3344. 

03345 

.0 0 0 0TG 0U... 

01Q2SGG1 

L 77 3 

2779 

....27..8......0... 

.ATjELTMIT' 

FCPT 

’ VFD'” 
QGT 

0 3346 

0 334 7 
03350 
03351 

0000 0000 

0 G 00 O 0 O G. 

OQOOOQOO 

00003000 

2781 

2782 
■ 2 7 6 3 

2784 

2785 

.L. 

EPAGEGNT 
■E FCCOUNI 
FCPAGELV 
NRES8 

VF D 
VFD" - 
VFD 
VFD 

...03352.. 

03353 

.....03354. 

.OO'OO'FO’OO'. 

00 00 0 000 

.0 4 21 0-421.... 

27 86 

2787 

.....2788 .... 

.TERF6"" 

FC8 BUSY 
FPFLAG... 

"'VFD." 

VFO 
-VF.D- • 

0 3355 
03356 
. - 0 335-7—- 

03372 

00000000 

00 00 0 0 00 

00000000 

00 00 0 000 

03375 P 

278 S 

2 79 0 

2791 

2792 

2793 

REQPAGE 
SFLAG 
FRPTR - 
FRONT 
FRCNTP3 

VFD 

VFD 

OCT 

OCT 

EQU 



~--2794.~~ 


"END.' 



o 

o 

& 

Q 

o 


NO.LINES.WITH.ERRORS. 


SCHEDULER 


♦-SIM01 


USED FOR SYSTEM SIMULATION 


6, MEMORY PARITY ERROR XXXa 

4,** ILLWRITE ERRa 
+-ILWERM 


A 24/I MPURE 


NON-ZEROSEZAVOIDCSP 


18.-. 

2 8 
48 
~108 
2 08 
408 

'TOO 8.. 

2008 

OlEoIT+SUSBIT. 

IRUN8IT+N0END8IT 

-FSWAIT8 
-0PI8IT 
-OISKIBT 
-IRUNBTT.*. 


-FREE .STORAGE.WAIT. 

OPERATOR INHIBIT 

EXPAND DISK TABLES INHIBIT 

SEZZ THAT END HAS 3EEN”LOADEO . 

PUT END ROUTINE IN DIE MODE 
SEZ INITIAL IS RUNNING, DONT END 
SUSPENDBATCH-DEVICE OPERATION 


A9/d, A15/TPUNITS.-.NUMBER- OF.TAPE.UNITS.A VAIL A 8LE. 

14300000,77664156 ENI IMPURE,X3 / AIS 156 
A 24/IMPURE LAST LIBRARY BLOCK NUMBER 

A24/ IMPURE, A24/IMPURE... 

IRTEMPi+i 

09/000,A15/I0LE PSA POINTER FOR CURRENT USER 

U97 0' 0 O', A157 I'M PURE.LAST PSA THAT WAS DELAYED. : . 

A6/IMPURE,03/0,A15/IHPURE FRONT OF SECONDARY QUEUE. 

--A--9/iMPURE..,.A 1-5/i*-.-I.M PURE.PUSH-THROUGH SWAP QUEUE..- 

A24/IMPURE 

A24/IMPURE RECURSION LEVEL FOR GETMEM 

A 6/1MPURE,03/G,A15/IMPURE ...■. 

XTEMP 1 CHARACTER OF TEMPORARY STORAGE 

A 24/IMPURE,A24/IMPURE 


X67 I MPURE , 03/ 0 , A15/ 
A 24/IMPURE-2 
. A-2-4/1HP-U RE, - A-2 -4 7IM Pi 
LlTEMPl+1 
A24/IMPURE 
A 24/IMPURE 
IMPURE 

A 9/0,A15/IMPURE 
XS47TMPURE. 


IMPURE' 

NUMBE 

RE.— 


REE PAGES (STEALA3LE) 
.EVE-L 1 SWAPPER.TEMPS. 


CATE CF OLDEST PAGE 

PAGE NUMBER OF LOW VALUE PAGE. 

PAGEVALU RETURN ADDRESS 

NEXT SWAP UNIT NUM8ER-FSWAPUNT 


A 24/1MPURE 

A 24/IMPURE. 

A 24/IMPURE 
A9/0,A15/IMPURE 

A9/0,Ai5/IMPURE. 

A 9/0,A15/IMPURE 
-. A-2-4/-I HB URE+G 4210 4 2-18- 
A24/IMPURE 
A 24/1MPURE 
0 , 0 , 0 , 6 , 0 , 0 , 0 , 0 , 0 , 0 , 
0 ,0, 0,0,0,0,0,0, 0, 0, 
FRCNT+3 


01 SEZ LEAVE THINGS AS THEY ARE 

00 SEZ TO MAKE FILE CORE BLOCKS 

02 SEZ TO MAKE PAGES 

NUMBER OF EMPTY PAGES 

HUMBER OF EMPTY FC PAGES. 


+ -= MAKE PAGt 
.NUMBER OF FC 


:, -= MAKE FC BLOCKS 
LOCKS TO RESERVE 


ZERO IF A PAGE CAN SE MADE 
-.SSH.SKI P.EVERY.4TH.TIM E. 


•ZERO 

FLAG 


IF PAGE TO FC IN PR OGRES 
SEZ WHEN TO SCHEDULE 















































(p . 

A SS E MBLER/OS 

3 

VI 

.0 09/21/74 2300 

PAGE 

1 SCHEDULR 










- 0 ) 


A 

* ABORT 
..A 0 0 i\l J M.. 


X 

X 
.x 


10 7 
108 

.in q. 

831 

. 24 Ok 

00661P 

n ? sfi? p 













ACCSTUFF 
ACCWORD 


X 

00 00 0 

110 

71 

2303 

2301+1 

U2603P 

026Q1P 

2356 

026 74 P 

2360 

02700P 

2422 

02763P 





" 0 ) 

0 ... 

AGELIMIT 

ALT 

AOS 


X 

X 

Ub 34 4P 

.2 77 6 .* 

276 

ill 

1747 

1918 

1037 

017 60 P 
0 214 7 P 
01101P 

.17 7 5 

020 05P *. 

1761 

G2Q12P 







_ ,3 


A GV 

AOVLOC 

.S210R022. 


..x. 

0100 0 

0 0 0 0 6 , 

257 

283 

. 112 . 

1138 

1137 

..833-- 

01225P 
01224P 
00663P 

.11 5 6 

012 47 P 










0 

3ATCHNUM 

BATCHPNT 


X 

00022 

113 

130 

2280 

131 

0 25 46 P 
02514P 

2384 

027 27 P 









"O 

0 .. 

dATu.HPSA 

3ATCHQ 


X 

X 


.114." 

115 

2 27 8 
2269 
2314 

02544P 
02517P 
0 2 6 2 2 P 

2273+4 

025 26 P 

2291 

02566P 

2307+3 

02612P 

23 09 

02615P 

2312 

02620P 

H 0 


BCD. 

9C0L0C 

.....arc.__.. 


.V. 

040 0 0 

00 00 2 

258 

281 

....,.U4. 

1132 

1131 

____, 3 „n. 7 ,q,.. 

01217P 

01216P 


n ^ 7 F-F, P 









.. 6 

O 

3DPCR 

8 FPTR 


X 

0000 1 

117 

109 

Lu 1 

2078 

iil 

u C: *t J r 

02344P 

02.514P 

. 

2109 

U t U -u fj F . 

G2367P 









O 

O . 

o 1115 
BIT16 

81T17 


■.x.. 

X 

X 


.....ir&“. 

1 1 q 

12 0 

.~27 6 

275 

974 

0 0 0 0 3 P 
0 00 03P 
01U37P 

1523 

015 27 P 

2152 

02426P 

226? 

02515P 

2268 

02516P 





31 T19 
BIT20 

__BIT2 1 . 


X 

X 

.x. 


121 

122 

....123. 

22 84 
585 

....6i5 

0 2 S 5 ? P 
Q0324P 

.0^0-3-5'5-P-- 

596 

...-.-919- 

003 35P 

00 755 P.- 

.16S5-' 

-0-1654P. 

.24 

Q3012P. 






o 

31T 2 2 


X 


124 

274 

1484 

0 00 0 3P 
01471P 

377 

1652 

Q0067P 

016 51P 

860 

2588 

0 87 01P 
03130P 

911 

00752P 

1215 

01310P 

1455 

Q1454P 

o 

o _ 

8 IT 2 3 

BLK 


• 'X * 

00 0 0 0 

..... ~~±25~~~" 

247 

27 3 
230 7+1 
2339 

0 0 0 0 3P' 
0 2610 P 
0 26 53 P 

...1’25'6 

2307+5 

2361 

“01'334 P. 

0 2614P 

027 01P 

.. 2 053' 

2505 

2384 

02317P 
03044P 
Q2727P 

2183 

2417 

- 024'5'3F'“‘. 

Q2756F 

. . . 2235 

2417+2 

0 2 5 OOP 

02760P 

2245 

2420 

0 2 504P 

02761P 

.o 


8LKP0S 
* 8 LKR 

....3PARIT Y. 



0 0 0 0 2 

00 00 5 

00076P—■ 

ill 

8 8 

______3g4_ 

112 

.3 3 a 

0 2 514 P 

..0 0.0-35 P - 

.... LA.& 

.1-4 P 










o 

CALLSAO 
CBLOCK 



00004 

00011 

113 

118 

115 

119 

02514P 

02514P 











o 

o. 

C0P 

CHCHKRTN 

CHERRTAB 

- 

X 

0 0 0 0 3 

0 2 64 OP 

7 6 

2 32 5 
126 

“-23Q5 

41 

400 

0 26 05 P 
000 OOP 
00104P 

2270 

4 01 

02520P 

00105P 

2273+3 

02525P 

2279 

Q2545P 

22 81 

02547P 



.:. O 


.CLEARN. 

CLOCK 

_CHCHE K_ 

1 


Q2472P 

0 Q 0 2 2 
■ Q2374P.- 

2227 

250 

_244-4. 

.40 

891 

__. 20 - 6 ? - 

0 0Q OOP 
0Q734P 

- 0-2-3 3 0 P- 

2235 

1661 

Q2502P 

016 61P 

1744 

01755P 








O " 

CMCODE 

CHEXIT 

.•&»«« 

.X. 

X 


127 

128 

2024 

2414 

02264P 

02753P 

~202 T 

"02267P. 

2116 

02376P 

.2182 

.a2452P 

2186 

0245 6 P 

.2228 

02473P 

' O 

o _ 

bfiu:>E I 
CN 8 LK 

E. 


0E45IP— 
0000 0 

2181 

266 

q9 

2292 

2 32 0 

0 0 0 08 P 
0 25 67 P 
Q2626P 

' ^ J" 

Z 301+1 

000 74r 
02601P 

• 2034' 

2304 

02276P 

02604P 

.. 2189 ' 

2305 

G2461P 

02605F 

~~2'3'6"5~ 

23 07 

027G5P 

02607P 

2307+2 

02611P 

. O 


U0W0RD 
C0N3L0CK 
__CORE. 



TTDTTZ5F. 

0 0 a Q Q 

-94888-.- 

i¥{r ~ 
, 108 
...238 

-PTE"' 

. 109 

_45.94- 

TFZ5T4F' 

02514P 

-0-157-5.1?- 

_____4A.fl.ft.. 

^Q-tS-Z&.R _ 

;_ 1 -- 6 - 0-1 - 

01577 P 








o ~ 

COREP 

CPP 

P D 



0000 2 

0 0 0 0 4 

'73 

77 

76 

2307 

00003P 
026G7P 

1924 
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TRUNT I ME 
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2729 03277P 
324 00016P 
357 00043P 
396 00100P 
413 GOlilP 

“441.0 0I45P. 

551 00271P 

---59-4.00-333 P 

632 0 0375P 
693 0 Q456P 
—733 00523P 
1208 0130 IP 
1267 01345P 
1418 014166 
1457 G1456P 

.15.5.8.015 5 IP.. 

1602 0 160 OP 
1653 01652P 
1720 01742P 
1822 02050P 
2058 02324P 

2079.02345P 

2281 02547P 

2307+2.0 261IP 

2409 02746P 
2493 03032P 
2578Q3116P 
2617 0 3163 P 


8 71 0 07 HP 


490 00205F 
569 00311P 
706 00470F 
731 Q0521P 

.“809.06637P. 

859 00700F 

.947. 0101 OP 

1063 01127P 
1260 01337P 
—1291- 0137IP' 
1440 01442P 
1460 01461P 

.1575“.0156 OF. 

1625 01623P 

.1651.0165 OP- 

1689 01705P 
1761 01767P 
1875 02107P 
1929 02162P 
1951 02204P 

2093.0 23 4 7 F. 

2157 02433P 
2-273+7.0 2-5-3 IF- 

2291 02566P 
2320 + 1. 02627P 

”2366 02706P 
2404 02741F 
2417+2 0276 OP 

.2459.Q30G7F. 

2484 03024P 
.25 67..03.127-P. 

325 00017F 
360 Q0046P 
3 97 0 010 IP 
427 Q0127P 

-472. 00X6 3F . 

552 00272P 

. 5-9-8 .0 03-27P- 

638 00403F 
694 00457P 

—785+3 .G 06 HP” 

1209 013D2P 
1268 01346P 

“ 1431 .01432P. 

1462 01463P 

.1594.015 7- OP. 

1603 G1601P 
1664 01664F 

—1722 .01743P. 

1855 02075P 
2059 02325P 
.2097 0235 3P 

2292 02567P 

. 2-320 .026 2 6 F 

2410 02747P 
2499 G3036F 
258403124P 
2620 03166F 


121201305P 


451 00206P 

..6 55 00416P 

710 00474P 
735 00525P 

849.0067IP. 

868 007Q6P 

.95401016P 

1205 01276P 
1262 01340P 

.1292” 01372P 

1442 01444P 
1493 01474P 
158201567P 
1629 01627P 
-1656Q1655F 
1691 01707P 
1779 Q2011P 
1878 02112P 
1930 02163P 
1952 62205P 

.2094.0235OP. 

2160 02436P 

.2274.02540 P- 

2307+3 02612P 
2320+2 02630P 
2368 02710P 
2405 02742P 
2420 0276IP 

.2460 03 01QP 

2517 03055P 
. 25-9-2.-8-31-33P— 

328 Q0022P 

.362 0005QP 

4 G 0 0Q104P 
430 G0132P 

..4 76.0 0T67P 

564 00305P 

.-. 5-9-9 00340P-. 

669 00434P 
721 0Q507P 

--869 00707P 

1211 01304P 
1409 01405P 

.1432 01433P. 

1483 01470P 

. 1598 . 015 74P 

1604 01602P 
1674 01675P 

.17 3 0 01753P 

1905 02132P 
2068 02332P 

..2102.02360P. 

2301+1 02601P 

-.2340.02654P. 

2413 02752P 
2500 03037P 
—25 89 0313IP ~ 
2648 03215P 


121301306P 


493 00210P 
— 661 00424P- 
716 00502P 
755 00551P 

...855.00674P 

890 0 0 733P 
95501017P 
1223 01316P 
1266 01344P 
1304 01402P 
1443 01445P 
1498 Q15Q4P 
161401616P 
1632 01632P 

.1665 01665P 

1706 01724P 
1814 02040P 
18 81 02115 P 
1938 02167P 
1961 02216P 

..20 95 02351P 

2266 02514P 
227502541P 
2309 02615P 
2320+5 Q2633P 
2375 02717P 
2406 02743P 
2428 02771P 
2464 03014P 
2577 03115P 
260403146P 

334 00030P 
36300Q51P 
401 00105P 
435 0Q137P 
47700170P 
565 0Q306P 

. 606.0 0 345P 

670 0 0 435 P 
726 00514P 
■87000710P 
1212 01305P 
1411 01407P 
1435 01436P 
1546 01536P 

.-.1599.01575P 

1607 01605P 
1704 01722P 
1762 01770P 
1915 02144P 
2069 02333P 
213302403P 
2304 02604P 

..23 42 02656P 

2461 03011P 
2507 03046P 
—2609 03153P 
2676 03247P 
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SCHEDULR 



2684 03255P 268503256P 268803261P 272803276P 

375 GQ065P 376 Q0066P 383 QQ072P 533 00251P 

—- 581. 0 032 OF .^. 5 91 0 033OP..6 04 00343P 

609 0 0350 F 613 00353P 614 00354P 616 00356P 

628 00371P 645 00410P 649 00412P 650 Q0413P 

"~6'62 0 0425P.666 00431P 679 G0442P 6 83 0 0444P 

737 00527P 745 00537P 747 Q0541P 752 00546P 

767 00565P 769 00567F 774 Q0574P 779 00601P 

806.0 06 34P . 6 07 00635P.. 814 0 0 64 OP.' 816 00642P 

819 00645P 820 00646P 830 00660P 831 Q0&61P 

.836 0 C666P -.8 38.006 7 OF—---8 61 0Q7 02P--—8 72 00712P 

878 0 0720 P 880 00722P 893 0Q740P 899 00741P 

912 G0753F 921 00757F 929 00767P 934 00773P 

—9^8—0 tfl-oip™- --943 01004P . 945' 01Q0&P . 951 01013P 

965 01027P 973 01036P 998 01053P 999 01054P 

1027 01Q67P 1034 01076P 1040 011Q4P 1042 01106P 

“1051 .QTiTSP.....1054. 0112 OF ... 1059 .0T123F . 1064. 01130P 

1076 01143P 1077 01144P 1079 01146P 1080 01147P 

1036.01153P-~.-.10 95.01164P.1103.0117 2 P.1109.012 OOP- 

1139 01226P 1140 01227F 1141 01230P 1143 01232P 

1149 01240P 1154 01245F 1155 01246P 1153 01251P 

1171 01262P. ±172- G12 63P- .. 1173 012&4P.—1174 01265P 

1179 01272P 1180 01273P 1206 01277P 1210 01303P 

1275 01353P 1419 01417P 1427 01426P 1430 Q1431P 

'TTO"irr47'2F T5TT2" .0150 7F . -"1503 . 01510P . 1505. 01512P 


1522 01526P 

_4.57.4_ .Q1557P. 

1630 0163 0 P 
1713 Q1733P 
'1727” 0175-OP- 
1787 0 2017 P 
1819. 02045P 
1909 02136P 
1937 Q2166P 

'1984.0-2 2-3-2 P. 

2 018 0 2256 P 
2027 02267P 
•2045“02307P 
2098 02354P 
2110 0237 OP 
'■■214¥ 0 2415F 
2182. 02452P 
_^m-0-2473.'P- 
2297 G2574P, 
320+4 02632P 
-'2341 0 2655P 
2353 0267IP 
2363 027S3P 
“2415“Q'275-4'P"' 
2491 Q 3 0 3 0 P 
__£.54B—0-3-G-5&P..'. 
2588 03106P 
2629 03176P 
2653 &3222P- 
2704 Q3265P 
2730 033Q0P 
..1692.GT7T0F" 


1535 01535P 

.... 457.6 .C15&1P. 

1649 01646P 
1714 01734P 

"1.7 2 8.0175TP— 

1790 02Q22P 
18 23 0205 IP 
’1910’ G2187P 
1945 02176P 

-49-8-5.G 22-33-P. 

2019 0 225 7P'- 
2029 02271P 
2046 02310p- 
2100 023EBP 
2114 G2374P 
£143 02422P 
2186 0245 6F 
.22-61 0 251 IF 
2298 0 2575F 
232C+9 Q2S37P 
•2343 02657P 
2355 02673P 
2374 02716P 
"2422 Q2763P 
2498 03G35P 

— Z3m -080 7.6P. 

2574 G3113F 
2631 0320 GP 
-2668 0 32 27 P 
.2705 8 3 2 6 6 F 

.1700 01716P. 


1550 01542P 

..1-57-8.04 5 63 P 

1660 01660P 
1715 01735P 
1759-01765P 
1792 G2G24P 
1824 0.2052P 
T9 13 0 214 2 P 
1947 G2200P 
-- 19 99 G2237P 
2020 02260P 
2031 02273P 
2047 023IIP 
2103 02361P 
2116 02376P 
2149 D2423P 
2200 02463P 
22-82 + 5 02555P 
2299 0257&P 
2332+4 02643P 
2344 02660P 
23 56 0 2 6 7 4 P 
23 77 0272IP 
2423 02764P 
2501 G3G40P 

-. 2561 G30 77P 

2623 03170P 
2632 0 320IP 
2669 li32 3OF 
2706 03267P 

.1713.0173 3P 


1552 01544P 

.1605 01604P 

1663 01663P 
1716 01736P 
—T7'67 01 - 7-7 5 p 
1798 Q2031P 
1825 02Q53P 
191602145P 
1949 02202P 
- 20000224OP 
2021 02261P 
2035 02277P 
2050 02314P 
2104 02362P 
2132 02402P 

.215102425P 

2201 02464P 
228302556P 
2300 02577P 
2332+6 02645P 
2346 02662P 
2358 02676P 
2400 02735P 
242602767P 
2502 03041P 

.-2562. 031 OOP- 

2624 03171P 
2635 03204P 
2662 03233P 
2708 03271P 

2054 02 32OP 


571 0031-3P 
904 0Q746P 


684 0Q445P 
1723 01744P 


698 00463P 
2013+2 Q2252P 


793 00622P 
2042 02304P 






























